die "usage: perl argv.test.pl a b c d ...\n" unless @ARGV; for(0..$#ARGV){ print " ARG $_ $ARGV[0]\n"; } __END__ C:\>perl argv.test.pl usage: perl test.pl a b c d ... at argv.test.pl line 2. C:\>perl argv.test.pl 1 2 a b c ARG 0 1 ARG 1 1 ARG 2 1 ARG 3 1 ARG 4 1 C:\>
In reply to Re^4: Create new command winow using Term::ShellUI
by Anonymous Monk
in thread Create new command winow using Term::ShellUI
by kranthi
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |