Замудрёным регекспом?

Question

[Максим]

Задача: из имени домена вида part1.part2.part3.part4 получить домен вида part2.part3.part4 используя capture groups

part1 и part2 могут отсутствовать

если part2 нет (домен второго уровня), то получить домен www.part3.part4


В итоге должно работать так:
www.subdomain.domain.ru -> subdomain.domain.ru

subdomain.domain.ru -> subdomain.domain.ru
www.domain.ru -> www.domain.ru

domain.ru -> www.domain.ru


Использование capture groups принципиально.


Возможно ли решить задачу в рамках PCRE?


Вопрос также можно сформулировать в виде: как в PCRE задать значение для capture group, если она выглядит как (.+)? и не сматчилась.

Answer 1

[noonesshadow]

server_name "~^(?\w+\.)?(?\w+\.)?(?\w+\.)(?\w+)$"
if ($part2 = "") {$part2 = «www»;}
return 301 http://$part2$part3$part4

Comments

[noonesshadow]

server_name "~^(?<part1>\w+\.)?(?<part2>\w+\.)?(?<part3>\w+\.)(?<part4>\w+)$" if ($part2 = "") {$part2 = "www";} return 301 http://$part2$part3$part4

[Максим]

ну с if решение очевидно.
сейчас так и сделано, но очень хочется избавиться от условных конструкций.

[noonesshadow]

регулярные выражения не могут вам из ничего создать www
так что без ифа — только два server_name
первый знак вопроса — отметка именованой группы. в первом посте система хабра съела знаки

[Максим]

про вопросы понял со вторым комментарием, ага =)

> регулярные выражения не могут вам из ничего создать www

вот в отношении этого как раз и возникают подозрения. я сам-то в принципе свободно оперирую perlre, но иногда смотрю что люди с помощью них творят (взять хотя бы тот же канонический проверяльщик валидности email-адреса) и возникает ощущение, что я второклассник =) поэтому была надежда, что возможно как-то глубоко через задницу, но можно сделать что нужно.

[Ярослав Астафьев]

Если поддерживаются ретроспективные проверки и какой-то простенький аналог replace — то это можно сделать без if.
Например негативной проверкой назад.

Answer 2

[Ярослав Астафьев]

server_name s"~^(?\w+\.)?(?\w+\.)?(?\w+\.)(?\w+)$«htttp://(?($part2)www|)$part3$part4»g

Конечно, если язык поддерживает конструкцию (?(n)то|иначе). Такую конструкцию можно написать с помощью ретроспективных проверок.

P.S.
Не вините за синтаксис, точных правил не знаю

Comments

[Ярослав Астафьев]

Если не нравится такой подход — то можно вынести проверку не в replace => а во входной regexp и тогда в зависимости от варианта создавать или не создавать группы

Answer 3

[Ярослав Астафьев]

Но на вашем месте я бы просто приписал бы 'www.' слева и воспользовался бы просто регуляркой в духе
$_ = «www.» + serverName;
s/^(?:\w+\.){0,2}(\w+\.\w+\.\w+)$/$1/g

Answer 4

[vsespb]

PCRE, не смотря на то, что расшифровывается как Perl Compatible Regular Expressions, не имеет отношения к Perl. В Perl регэкспы другие. PCRE просто старается сделать их похожими.

(это я к вопросу названия хаба)