Как убрать предупреждение «Использование неинициализированного значения»?

Question

Допустим, я хочу написать регулярное выражение для изменения всех тегов <abc>, <def> и <ghi> на теги <xyz>, а также я хочу изменить их закрывающие теги на </xyz>. Это выглядит как разумное регулярное выражение (игнорируйте обратные пометки; у StackOverflow есть проблемы со знаками «меньше», если я их не включаю):

`s!<(/)?(abc|def|ghi)>!<${1}xyz>!g;`

И это тоже работает. Единственная проблема заключается в том, что для открытия тегов необязательной переменной $ 1 присваивается значение undef, и поэтому я получаю предупреждение «Использование неинициализированного значения ...».

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

Редактировать: Я знаю, что могу просто отключить предупреждения в этой области кода, но я не считаю это "элегантным".

Answer 1

Переместите вопросительный знак внутри захватной скобки. Таким образом, $ 1 всегда будет определяться, но может быть строкой нулевой длины.

Answer 2

Как насчет:

`s!(</?)(abc|def|ghi)>!${1}xyz>!g;`

Answer 3

s!<(/?)(abc|def|ghi)>!<${1}xyz>!g;

Разница только в том, что меняется "(/)?" на "(/?)". Вы уже определили несколько функциональных решений. Я думаю, в этом есть та элегантность, о которой вы просили.

Answer 4

Вот один из способов:

   s!<(/?)(abc|def|ghi)>!<$1xyz>!g;

Обновление: удален ненужный комментарий об использовании (?:pattern).

Answer 5

Вы можете просто сделать свой первый матч (</?) И избавиться от жестко закодированного <на стороне "замены". Тогда $ 1 всегда будет иметь «<» или «</». Могут быть более элегантные решения для решения проблемы предупреждения, но это должно решить практическую проблему. </p>

Answer 6

Будьте осторожны, поскольку HTML немного сложнее, чем кажется на первый взгляд. Например, вы хотите изменить "" на ""? Ваше регулярное выражение не будет. Хотите изменить "'>"? Регулярное выражение будет. Вместо этого вы можете захотеть сделать что-то вроде этого:

use HTML::TreeBuilder;
my $tree=HTML::TreeBuilder->new_from_content("<abc>asdf</abc>");
for my $tag (qw<abc def ghi>) {
  for my $elem ($tree->look_down(_tag => $tag)) {
    $elem->tag('xyz');
  }
}
print $tree->as_HTML;

Это избавляет вас от необходимости разбирать HTML-фрагменты самостоятельно.

Answer 7

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

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

Answer 8

Чтобы регулярное выражение захватывало $ 1 в любом случае, попробуйте:

  s!<(/|)?(abc|def|ghi)>!<${1}xyz>!g;
       ^
       note the pipe symbol, meaning '/' or ''

Для '' это будет захватывать '' между '<' и 'abc>', а для '' захватывать '/' между '<' и 'abc>'.

Answer 9

Добавить

no warnings 'uninitialized';

или

s!<(/)?(abc|def|ghi)>! join '', '<', ${1}||'', 'xyz>' !ge;