регулярное выражение, добавляющее символы, когда несуществующие

Question

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

2-регулярное выражение ищут так:

s@.*/(\d\.\d\.\d)/@Version: $1/@g 
s@.*/(\d\.\d)/@Version: $1.0/@g 

Я пытаюсь его

s@.*/(\d\.\d)(\.\d)?(?(2)|\.0)/@Version $1$2$3/@g 

, но он не работает. Я понял условности неправильно? Некоторые номера версий имеют только 2 цифры, а те, которые я хочу добавить в ".0".

Answer 1

У вас есть небольшая проблема в вашем регулярном выражении:

s@.*/(\d\.\d)(\.\d)?(?(2)|\.0)/@Version $1$2$3/@g 
        ^^^^^^^^^^ 

Часть I подчеркнуты интерпретируется как это на Perl: Если бы я захватил что-то в группе № 2, то ничего не делать, иначе пытаться соответствовать точке ., а затем 0.

Это не то, что вы ожидаете, другими словами, оно не фиксирует .0 в собственной группе.

В Perl для этого есть рабочее решение, используя модификатор регулярных выражений e, который позволяет вам выполнять код Perl в заменяющей части регулярного выражения, а значит, именно то, что нам нужно.

s/(\d\.\d)(\.\d)?/'@Version ' . $1 . ($2?$2:'.0')/ge; 

Это по существу говорит, что если бы вы были в состоянии соответствовать группе 2 $2? затем положить $2 в строке замены, иначе ставить .0 как этот :'.0'.

Perl оценивает заменяемую строку как код Perl, так что оператор . является оператором конкатенации.

Codepad Demo