请查看使用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;
}
非常简单，如果您要导航到该页面上的其他URL，则更加简单。
机械基本上是对象中的浏览器。
602392714
清零编程群