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

Question

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

Answer 1

像

这样的东西

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

其中$ line将是您正在查看的行或文件的内容。

Answer 2

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

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

Answer 3

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

use File::Slurp;

my $text = read_file( 'filename' ) ;