Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
# test1.pl
...
while (my $var = <>){
    print $var;
}
  2. or download this
    #!/usr/bin/perl
# test1.pl
...
use warnings;

print "$_ " foreach @ARGV;
  3. or download this
    `exec` can be written:

...
exec { './test2.pl' } @{$array};
exec './test2.pl', @{$array};
exec './test2.pl', 1, 2, 3, 4;