printing command line arguments
This commit is contained in:
10
cli/argv.pl
Normal file
10
cli/argv.pl
Normal file
@@ -0,0 +1,10 @@
|
|||||||
|
#!/usr/bin/env perl
|
||||||
|
use strict;
|
||||||
|
use warnings;
|
||||||
|
|
||||||
|
foreach my $a (@ARGV) {
|
||||||
|
printf("$a\n");
|
||||||
|
}
|
||||||
|
|
||||||
|
1;
|
||||||
|
__END__
|
Reference in New Issue
Block a user