我有以下形式的文字:
Name=Value1 Name=Value2 Name=Value3
使用Perl,我想匹配/ Name =(。?)/每次出现并提取(。?)并将其推到数组上。我知道我可以使用$ 1来获取我需要的文本,我可以使用=〜执行正则表达式匹配,但是我不知道如何获得所有的匹配。
列表上下文中的m // g返回所有捕获的匹配项。
#!/usr/bin/perl use strict; use warnings; my $str = <<EO_STR; Name=Value1 Name=Value2 Name=Value3 EO_STR my @matches = $str =~ /=(\w+)/g; # or my @matches = $str =~ /=([^\n]+)/g; # or my @matches = $str =~ /=(.+)$/mg; # depending on what you want to capture print "@matches\n";
但是,您正在解析INI样式的配置文件。在这种情况下,我会推荐Config::Std。