| 关键词: print ARGV 5555 ARGC perluse 网页 Simple Usage while hack |
#!/usr/bin/perluse LWP::Simple;$ARGC = @ARGV;while ($ARGC != 2){#这里5555是打开该网页5555次.. :)print "Usage: $0 http://www.hack base.com 5555 \n" ;exit();}for ($i = 1; $i <= $ARGV[1]; $i++){print (get $ARGV[0]);print "\n";} |
|
声明:文章版权归原作者所有 部分文章转自互联网 如有侵权请联系
[邮箱地址] 删除
|