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

Ответ 1

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

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

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

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

Ответ 2

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

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