原文是《使用 AnyEvent::HTTP 的高速代理验证程序》 55555....
2011/12/4 cnhack TNT <[email protected]> > 欲哭无泪啊，写了一下午的 Day 4, 最后生成 html 的时候直接按 tab 做了这么个操作： > > cnhacktnt@Apollo:proxy$ pod2advent ae_proxy.pod > ae_proxy.pod > > > 愣了一下，直接就悲剧了啊，还没 ci 到 git 里， 写的东西都没了。。。vim也退出了，连临时文件都没了。。。555，我敲了好几个小时啊。。。！ > > 原文是《使用 AnyEvent::HTTP 的告诉代理验证程序》，现在只剩下代码了，算了，附上代码吧（见附件）. > > 使用方式是，收集一部分待验证的 HTTP 代理地址，按如下格式存成 proxy.txt 文件： > > > 201.75.96.153:3128 > > 76.111.254.51:1111 > > 211.139.10.183:80 > > 78.154.146.173:80 > > 200.52.133.188:8080 > > 85.26.197.206:3128 > > 86.110.154.82:3128 > > 122.72.12.90:80 > > 203.114.146.116:3128 > > 190.201.126.171:8080 > > 202.108.5.114:80 > > 209.115.188.53:80 > > 90.182.144.34:3128 > > 204.188.215.51:3128 > > 69.247.158.186:1586 > > 202.154.4.23:8080 > > 190.5.199.18:3128 > > 123.127.98.170:80 > > 109.75.64.30:3128 > > 64.37.51.144:3128 > > 然后使用如下命令： > > cat proxy.txt | perl ae_proxy.pl | tee ,result > > > 就可以看到结果了，验证8000多个代理，耗时28秒。（如果待验证代理数量不足最大并发数，至少也要5秒，因为超时时间为5秒） > > > 哭死！哭死！哭死！ > > 血泪的教训，同学们打命令别太快了。。。。。 > > -- 您收到此邮件是因为您订阅了 Google 网上论坛的“PerlChina Mongers 讨论组”论坛。 要向此网上论坛发帖，请发送电子邮件至 [email protected]。 要取消订阅此网上论坛，请发送电子邮件至 [email protected]。 若有更多问题，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。
