首页 电脑 电脑学堂 查看内容

perl简单get网页

2009-10-15 09:08 730 0

摘要: #!/usr/bin/perluse LWP::Simple;$ARGC = @ARGV;while ($ARGC != 2){#这里5555是打开该网页5555次.. :)print "Usage:...
关键词: 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";}
声明:文章版权归原作者所有 部分文章转自互联网 如有侵权请联系 [邮箱地址] 删除

路过

雷人

握手

鲜花

鸡蛋

最新评论

返回顶部