如何使用Perl的WWW :: Mechanize从页面中提取所有链接（不包括一个链接）？

Question

我试图使用WWW :: Mechanize使用find_all_links()方法从HTML页面提取一些链接。 它支持根据以下条件进行匹配：

• 文本
• text_regex
• 网址
• url_regex
• url_abs
• url_abs_regex
  ...

我如何提取除具有文本“ xyz”的链接以外的所有链接？

Answer 1

您可以使用'text_regex'条件：

$mech->find_all_links(text_regex => qr/^(?!xyz$).*$/);

有关否定的前瞻性断言的更多信息，请参见perldoc perlre 。

Answer 2

为什么不获取所有链接，然后使用'grep'跳过不需要的链接？