perl ARGV

#引数の数と内容を表示する。

#引数の数を表示
print "ARGVの数：".@ARGV."\n";

#各引数の内容を表示
for($number = 0; $number< @ARGV; $number++){
    print "引数$number: $ARGV[$number]\n";
}

#実行結果
# $ perl argv.pl 
# ARGVの数：0

# $ perl argv.pl practical extraction and report language
# ARGVの数：5
# 引数0: practical
# 引数1: extraction
# 引数2: and
# 引数3: report
# 引数4: language

初めてのPerl 第6版