如何从Perl中提取URL和链接文本?

前端之家收集整理的这篇文章主要介绍了如何从Perl中提取URL和链接文本?前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
我以前问过如何在Groovy这样做。然而,现在我正在Perl重写我的应用程序,因为所有的CPAN库。

如果页面包含这些链接

<a href="http://www.google.com">Google</a>

<a href="http://www.apple.com">Apple</a>

输出将是:

Google,http://www.google.com
Apple,http://www.apple.com

在Perl中最好的方法是什么?

解决方法

请查看使用 WWW::Mechanize模块。它将为您提取您的网页,然后让您轻松地使用URL列表。
my $mech = WWW::Mechanize->new();
$mech->get( $some_url );
my @links = $mech->links();
for my $link ( @links ) {
    printf "%s,%s\n",$link->text,$link->url;
}

很简单,如果您想浏览该页面上的其他网址,那就更简单了。

Mech基本上是一个对象中的浏览器。

原文链接:https://www.f2er.com/Perl/173131.html

猜你在找的Perl相关文章