Jak komentować wyrażenie regularne Perl?

Question

W jaki sposób umieszczasz komentarze w wyrażeniu regularnym Perla?

Answer 1

pomocą modyfikatora/x:

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

patrz również first question w perlfaq6.

Również nie zaszkodzi przeczytać całą perlre, gdy jesteś na tym.

Answer 2

Nawet bez modyfikatora/x, można załączyć komentarze (# ...):

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