Question

求教，怎样用perl 读命令行传进来的参数，

Answer 1

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

追问

用 $ARGV[0],$ARGV[1]得到了想要的参数，谢谢
另外还有个问题，如果说我只传入了一个参数，那个代码里面的$ARGV[1]会是什么东西？
我用if 走了下分支 但是 undef 和“”都不对的样子。

追答

$ARGV[1]应该是not defined

你可以先判断一下@ARGV的长度就知道获得了多少有效的参数。不过有时候命令后面会带空格，也可能会被传到@ARGV中，做个简单的匹配过滤就可以了。

Answer 2

$put=@ARGV ;
print $put;