box-o-sand/cli/exercise_02/input_argv.pl

12 lines
117 B
Perl
Raw Normal View History

2011-01-07 02:50:49 +00:00
#!/usr/bin/env perl
use strict;
use warnings;
foreach my $inline (@ARGV) {
print $inline . "\n";
}
1;
__END__