LINUX.ORG.RU

Perl и регулярные выражения


0

0

Есть следующая задача из области телекоммуникаций. Приходит номер ($number), необходимо произвести две вещи : if ($number matches with $match_regexp) { <tranlate number>, где преобразование номера может включать в себя: a) удаление частей номера, например префиксов b) добавление каких-либо префиксов c) список действий a) и b) }

Реально ли <tranlate number> также выразить в виде одного regexp и таблицу разбора номера представить в виде: $match_regexp, $trans_regexp ?

(Т.е. сделать ее простой и generic).

anonymous

Re: Perl и регулярные выражения

Думаю, примерно так:

s/(reg_exp_1)(reg_exp_2)(reg_exp_3)/new_prefix$2new_sufix/g;

Вместо $2  подставится та часть, которая соответствует reg_exp_2.
Будь здоров.

Susanin ()
Вы не можете добавлять комментарии в эту тему. Тема перемещена в архив.