我如何使用perl或grep来提取文件中的所有链接

时间:2014-04-03 13:03:06

标签: perl

如何从只有一行的文件中获取所有链接。

例如文件内容:

ABC def WWW.----link_1----.html ARE ABC def WWW.---link_2----.html ABC def WWW.---link_3---.html

到目前为止我有这个命令:

perl -pe 's/.*(WWW.*?.html).*/$1/' file_name  

这只给了我:

WWW.---link_1-----.html

我想要的输出是每个链接在单独的行中:

link_1  
link_2  
link_3

1 个答案:

答案 0 :(得分:5)

您可以使用/g修饰符来匹配每个链接,

perl -lne 'print for /(WWW.*?[.]html)/g' file_name

输出

WWW.----link_1----.html
WWW.---link_2----.html
WWW.---link_3---.html