How to read command-line arguments with Perl

louyaoluan

Submitted by alvin on August 9, 2009 - 8:41pmtags:  args arguments argv command line perl perl read source code Perl command line FAQ: How do I read command-line arguments with Perl (command line args)?Answer: With Perl, command-line arguments are stored in the array named @ARGV.$ARGV[0] contains the first argument, $ARGV[1] contains the second argument, etc.$#ARGV is the subscript of the last element of the @ARGV array, so the number of arguments on the command line is $#ARGV + 1.Example Perl command line arguments programHere's a simple Perl program that prints the number of command-line arguments it's given, and the values of the arguments:#!/usr/bin/perl#---------------------##  PROGRAM:  argv.pl  ##---------------------#$numArgs = $#ARGV + 1;print "thanks, you gave me $numArgs command-line arguments.\n";foreach $argnum (0 .. $#ARGV) {print "$ARGV[$argnum]\n";}