perl - 我如何从页面中提取所有链接，但不包括使用 Perl 的 WWW::Mechanize 的链接？

Question

我正在尝试使用 WWW::Mechanize使用 find_all_links() 方法从 HTML 页面中提取一些链接。它支持根据这些标准进行匹配:

• 正文
• 正则表达式
• 网址
• url_正则表达式
• url_abs
• url_abs_regex
  ...

我怎样才能提取所有链接有文本“xyz”的链接？

Answer 1

您可以使用 'text_regex' 条件:

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

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