从 HTML网页中解析出链接代码,Perl代码库,德仔网

代码语言

代码分类

【Perl】从 HTML网页中解析出链接

作者:汶纡 / 发布于2014/11/18/ 1173


	use LWP::Simple;
	use HTML::LinkExtor;

	$html = get("http://www.oschina.net");

	$link_extor = HTML::LinkExtor->new(\&handle_links);

	$link_extor->parse($html);

	sub handle_links
	{
	 ($tag, %links) = @_;

	 if ($tag eq 'a') {

	 foreach $key (keys %links) {

	 if ($key eq 'href') {

	 print "Found a hyperlink to $links{$key}.\n";

	 }

	 }
	 }
	}

评论列表

本站所提供的代码，版权归原作者所有，若有侵犯作者版权，请与我们联系，我们将立即删除或修改。谢谢!
本站所有代码发布及提供者。

　　

试试其它关键字

同语言下

可能有用的

汶纡贡献的其它代码(55)