Help for this page

Select Code to Download

Select or download this

#! perl
use strict;
...
    my ($name) = @_;
    print "foo --> name = $name, \$_ = $_\n";
}