问题
How do you put comments inside a Perl regular expression?
回答1:
Use the /x modifier:
my $foo = "zombies are the bombies";
if ($foo =~ /
zombie # sorry pirates
/x ) {
print "urg. brains.\n";
}
Also see the first question in perlfaq6.
Also it wouldn't hurt to read all of perlre while you're at it.
回答2:
Even without the /x modifier, you can enclose comments in (?# ... ):
my $foo = "zombies are the bombies";
if ( $foo =~ /zombie(?# sorry pirates)/ ) {
print "urg. brains.\n";
}
来源:https://stackoverflow.com/questions/632795/how-do-you-comment-a-perl-regular-expression