最简单的是用@ARGV获得命令后面的参数表如执行“perl ppp.pl 1 2 3 4 5”ppp.pl后面跟着5个参数，在程序中可以直接通过调用$ARGV[0],$ARGV[1],$ARGV[2],$ARGV[3],$ARGV[4]来分别调取。
$put=@ARGV ;print $put;
