Select Code to Download

$a=<>;       #reads one line in from the keyboard including
             #the newline character (\n) and puts it into $a
...
while(<>){        #reads lines until end of file or a Control-D from t
+he keyboard
   print "$_";    #prints lines back out
}

print "Hello World\n";    #the simplest sort of print
print "Hello ","World\n"; #this prints the same thing but uses a list 
+of strings to do the same thing
print ("1+1=",(1+1));     #prints 1+1=2 first prints the string 1+1= a
+nd then what 1+1 evaluates to(2);

<BR>
printf "%3d %7.2f %5s\n",$a,$b,$c;