2017年3月12日

perl HTML::HeadParser获取html头部信息

摘要: 1 use LWP::Simple; 2 use HTML::HeadParser; 3 use utf8; 4 binmode(STDOUT, ":encoding(gbk)"); #设置win下输出中文 5 6 $result = get('http://www.baidu.com'); 7 $what = HTML::HeadParser->new; 8 $what->p... 阅读全文

posted @ 2017-03-12 03:10 Perl6 阅读(323) 评论(0) 推荐(0)

perl HTML::LinkExtor模块(2)

摘要: 当然, 你还可以加一下正则, 去掉不是http://开头的也行 阅读全文

posted @ 2017-03-12 02:51 Perl6 阅读(640) 评论(0) 推荐(0)

perl HTML::LinkExtor模块(1)

摘要: 这个代码打印页面中的所有标签名与对应的link链接地址 如果我们要打印其中的所有img地址呢,那我们可能用$tag来判断是哪种标签, 从而再进一步提取数据 具体可以看这里: perl HTML::LinkExtor模块(2) 阅读全文

posted @ 2017-03-12 02:42 Perl6 阅读(249) 评论(0) 推荐(0)

导航