从行/文件中提取所有匹配的模式

Question

是否有一种简单的方法可以将所有匹配的模式从行或文件提取到Perl数组中 而不使用循环？

Answer 1

喜欢的东西

my @matches = ($line =~ /pattern/g); 

其中$行要么是你要寻找的行或文件的内容。

Answer 2

在列表上下文中使用/g。

@matches = $lines =~ /.../gm 

Answer 3

此外，CPAN上的File :: Slurp是一次读取文件所有行的简短方法。

use File::Slurp; 

my $text = read_file('filename') ;