printing input from argv

cat-town
Dan Buch 14 years ago
parent 611c9f4355
commit 1a904efe69

@ -0,0 +1,11 @@
#!/usr/bin/env perl
use strict;
use warnings;
foreach my $inline (@ARGV) {
print $inline . "\n";
}
1;
__END__
Loading…
Cancel
Save