Как вы прокомментируете регулярное выражение Perl?

Question

Как вы помещаете комментарии в регулярное выражение Perl?

Answer 1

Используйте модификатор /x:

my $foo = "zombies are the bombies";
if ($foo =~ /
             zombie  # sorry pirates
            /x ) {
    print "urg. brains.\n";
}

Также смотрите первый вопрос в perlfaq6.

Также не мешало бы прочитать все perlre, пока вы на нем.

Answer 2

Даже без модификатора /x вы можете заключить комментарии в (?# ...):

my $foo = "zombies are the bombies";
if ( $foo =~ /zombie(?# sorry pirates)/ ) {
    print "urg. brains.\n";
}