Help for this page
#!/usr/bin/perl ... chomp($a=<STDIN>); print $a, "\n";
#!/usr/bin/perl ... print "Product ",$x*$y, "\n";