Mega Code Archive

 

Categories / Perl / Language Basics

 

Verify the total number of the command line parameter

#!/usr/bin/perl -w # argv2.pl use strict; print "program arguments:\n"; my $i = 0; while ($i <= $#ARGV) {     print "argument $i: $ARGV[$i]\n";     $i++; }