Help for this page

Select Code to Download


  1. or download this
    
    #!/usr/bin/perl
    ...
    chomp($a=<STDIN>);
    print $a, "\n";
    
  2. or download this
    #!/usr/bin/perl
    
    ...
    
    print "Product ",$x*$y, "\n";