Perl program to find sum of digits of a number

print"Enter a number: ";
$n=<STDIN>;
$s=0;
while($n>0)
{
$s=$s+($n%10);
$n=$n/10;
}
print"Sum is $s\n";

Publisher: Creative Boyz - 7:13:00 PM

Perl program to check whether a number is palindrome or not

print"Enter a number: ";
$n=<STDIN>;
$t=$n;
$s=0;
while($n>0)
{
$r=$n%10;
$s=($s*10)+$r;
$n=int($n/10);
}
if($t==$s)
{
print"Number is palindrome\n";
}
else
{
print"Number is not palindrome\n";
}

Publisher: Creative Boyz - 7:12:00 PM

Perl program to find the Fibonacci series for a given number of terms

print "Enter the limit: ";
$n=<STDIN>;
$f1=0;
$f2=1;
print "Fibonacci series:\n";
if($n==1)
{
print "0\n";
}
elsif($n==2)
{
print "0\n1\n";
}
elsif($n>2)
{
print "0\n1\n";
$f3=$f1+$f2;
print "$f3\n";
for($i=2;$i<$n;$i++)
{
$f1=$f2;
$f2=$f3;
$f3=$f1+$f2;
print "$f3\n";
}
}

Publisher: Creative Boyz - 7:11:00 PM

Perl program to find the factorial of a number ("for" loop)

print "Enter a number: ";
$n=<STDIN>;
$t=$n;
$f=1;
for($i=0;$i<$t;$i++)
{
$f=$f*$n;
$n=$n-1;
}
print "Factorial is $f\n";

Publisher: Creative Boyz - 7:09:00 PM

Perl program to find the factorial of a number using recursion

print "Enter a number: ";
$n=<STDIN>;
$t=$n;
$i=0;
$f=1;
while($i<$t)
{
$f=$f*$n;
$n--;
$i++;
}
print "Factorial is $f\n";

Publisher: Creative Boyz - 7:08:00 PM

Java program to implement remote method invocation (RMI)

AddClient.java
import java.rmi.*;
import java.lang.*;
import java.io.*;
public class AddClient
{
public static void main(String args[])
{
try
{
String g;
int i;
String addServerURL="rmi://LocalHost/AddServer";
AddServerIntf addServerintf=(AddServerIntf)Naming.lookup(addServerURL);
System.out.println("enter a number");
BufferedReader s1=new BufferedReader(new InputStreamReader(System.in));
int a=Integer.parseInt(s1.readLine());
int d=addServerintf.fact(a);
System.out.println("factorial is:"+d);
int fib[]=new int[50];
fib=addServerintf.fib(a);
System.out.println("fibonacci series is :");
for(i=2;fib[i]!=-1;i++)
System.out.println(fib[i]);
g=addServerintf.prime(a);
System.out.println(g);
}
catch(Exception e){}
}
}

AddServer.java
import java.rmi.*;
import java.net.*;
public class AddServer
{
public static void main(String arg[])
{
try
{
System.out.println("Server Started");
AddServerImpl addServerimpl=new AddServerImpl();
Naming.rebind("AddServer",addServerimpl);
}
catch(Exception e)
{}
}
}

AddServerImpl.java
import java.rmi.*;
import java.rmi.server.*;
public class AddServerImpl extends UnicastRemoteObject implements AddServerIntf
{
public AddServerImpl()throws RemoteException{}
public int fact(int d)throws RemoteException
{
int f=1;
for(int i=1;i<=d;i++)
f=f*i;
return f;
}
public int[] fib(int d)throws RemoteException
{
int ret[]=new int[50];
int x=0;
int a=0,b=1,c=0;
for(int i=0;i<=d+1;i++)
{
ret[x++]=a;
a=b;
b=c;
c=a+b;
}
ret[x]=-1;
return ret;
}
public String prime(int d)throws RemoteException
{
String s;
int f=0,j=1;
for(j=1;j<=d;j++)
{
if((d%j)==0)
f=f+1;
}
if(f==2)
{
s="number is prime";
return s;
}
else
{
s="number is not prime";
return s;
}
}
}

AddServerIntf.java
import java.rmi.*;
public interface AddServerIntf extends Remote
{
int fact(int d)throws RemoteException;
int[] fib(int d)throws RemoteException;
public String prime(int d)throws RemoteException;
}

Publisher: Creative Boyz - 6:46:00 PM

Java program to implement sliding window protocol

Sender (slidsender.java)
import java.net.*;
import java.io.*;
import java.rmi.*;
public class slidsender
{
public static void main(String args[]) throws Exception
{
ServerSocket ser=new ServerSocket(10);
Socket s=ser.accept();
DataInputStream in=new DataInputStream(System.in);
DataInputStream in1=new DataInputStream(s.getInputStream());
String sbuff[]=new String[8];
PrintStream p;
int sptr=0,sws=8,nf,ano,i;
String ch;
do
{
p=new PrintStream(s.getOutputStream());
System.out.println("Enter the number of frames: ");
nf=Integer.parseInt(in.readLine());
p.println(nf);
if(nf<=sws-1)
{
System.out.println("Enter the "+nf+" messages to be send\n");
for(i=1;i<=nf;i++)
{
sbuff[sptr]=in.readLine();
p.println(sbuff[sptr]);
sptr=++sptr%8;
}
sws=-nf;
System.out.println("Acknowledgement received");
ano=Integer.parseInt(in1.readLine());
System.out.println("for "+ano+" frames");
sws+=nf;
}
else
{
System.out.println("The number of frames exceeds window size");
break;
}
System.out.println("\nDo you want to send some more frames?\n");
ch=in.readLine();
p.println(ch);
}
while(ch.equals("yes"));
s.close();
}
}

Receiver (slidreceiver.java)
import java.net.*;
import java.io.*;
class slidreceiver
{
public static void main(String args[]) throws Exception
{
Socket s=new Socket(InetAddress.getLocalHost(),10);
DataInputStream in=new DataInputStream(s.getInputStream());
PrintStream p=new PrintStream(s.getOutputStream());
int i=0,rptr=-1,rws=8;
String rbuff=new String[8];   
String ch;
System.out.println();
do
{
n=Integer.parseInt(in.readLine());
if(n<rws-1)
{
for(i=1;i<=n;i++)
{
rptr=++rptr%8;
rbuff[rptr]=in.readLine();
System.out.println("The received frame "+rptr+" is "+rbuff[rptr]);
}
rws-=n;
System.out.println("\nAcknowledgement sent\n");
p.print(rptr+1);
rws+=n;
}
else
break;
ch=in.readLine();
}
while(ch.equals("yes"));
}
}

Publisher: Creative Boyz - 6:42:00 PM