совпадающих пары значений имени без разделителя между ними

Question

У меня есть следующий пример отформатированной строка:

== header == information about things ==headeragain== info can have characters like.*?{= 

и т.д. только на одной линии.

Я хочу разобрать это на хэш, чтобы клавиши были «==. +? ==», а значения - информация после клавиш. Я попробовал несколько регулярных выражений глобально соответствуют этим парам:

%hash = $string =~ /(==.+?==)(.+)/g 

и

%hash = $string =~ /(==.+?==)(.+?)/g 

будет соответствовать первый ключ, а затем все остальное в качестве значения, и соответствуют только ключи соответственно.

%hash = $string =~ /(==.+?==)(.+(?===.+?==))/g 

Предполагается, что впереди следующий ключ, но не «съесть его», как я его понимаю. Тем не менее, он будет соответствовать только первой паре и не идти дальше.

Я думаю, эта проблема возникла из-за непонимания того, как действует глобальный модификатор. Нужно ли мне что-то менять в одном из моих выражений? Или мне нужно делать что-то совершенно другое?

Answer 1

Несмотря на то, что вы используете нежирный модификатор, для 2-й подгруппы в вашем втором примере нет ограничений.

Добавить положительный взгляд вперед: (?=$|==) после значения. Здесь (?= - это объявление блока ожидания, а $ или == - подстрока, которую вы ищете.

I.e. решение: /(==.+?==)(.+?)(?=$|==)/g

Answer 2

while ($line =~/
    == \s* 
    (.+?) 
    \s* == \s* 
    (.*?) 
    (?= \s* (?: == | \z)) 
/xg) { 
    my $key = $1; 
    my $val = $2; 
    ... 
} 

Но я не люблю, используя "?" модификатор кванторов. На самом деле это не мешает неправильному согласованию при неправильном или неожиданном вводе. Поэтому я бы воспользовался:

while ($line =~/
    == \s* 
    (\S (?: (?! \s* ==).)*) 
    \s* == \s* 
    ((?: (?! \s* ==).)*) 
/xg) { 
    my $key = $1; 
    my $val = $2; 
    ... 
}