my @matches = ($result =~ m/INFO\n(.*?)\n/);
Итак, в Perl я хочу сохранить все соответствия этому регулярному выражению. Я хочу сохранить значение между INFO \ n и \ n каждый раз, когда это происходит.Regex - сопоставить все вхождения?
Но я получаю только последнее вхождение. Неправильно ли мое регулярное выражение?
Используйте модификатор /g для глобального сопоставления.
my @matches = ($result =~ m/INFO\n(.*?)\n/g);
Ленивый Количественное является необходимым в данном случае как . не соответствует новой строки. Ниже будет давать более высокую производительность:
my @matches = ($result =~ m/INFO\n(.*)\n/g);
/s может быть использована, если вы хотите периоды, чтобы соответствовать новой строки. Для получения дополнительной информации об этих модификаторах см. perlre.
Lazy quantification '. *?' hurts regex performance –
Почему '/ s' необходим? Я не вижу причин для этого, так как его совпадение ** не должно содержать никаких символов новой строки. –
Вы правы, что это не имеет значения в этом случае, но поскольку он не знал о '/ g' и соответствовал многострочным строкам, казалось разумным, что ему понадобится'/s' раньше или позже. – Tim
Возможный дубликат [Как найти все совпадения с регулярным выражением в Perl?] (Http://stackoverflow.com/questions/1723440/how-can-i-find-all-matches-to-a- regular-expression-in-perl) – centic