如何使用Perl从HTML文件中提取链接？

Question

我有一些链接的输入,我想打开该链接.例如,我有一个HTML文件,想要查找文件中的所有链接,并在Excel电子表格中打开它们的内容.

Answer 1

听起来你想要我的HTML :: SimpleLinkExtor模块中的linktractor脚本.

您可能也对我的webreaper脚本感兴趣.很久很久以前,我写了一篇接近同样任务的文章.我真的不推荐它,因为现在其他工具要好得多,但你至少可以看一下代码.

CPAN和Google是你的朋友.:)

Mojo :: UserAgent对此也非常好:

use Mojo::UserAgent

print Mojo::UserAgent
    ->new
    ->get( $ARGV[0] )
    ->res
    ->dom->find( "a" )
    ->map( attr => "href" )
    ->join( "\n" );