Come si commenta un'espressione regolare Perl?

Question

Come si inseriscono i commenti all'interno di un'espressione regolare Perl?

Answer 1

Utilizzare il/x modificatore:

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

vedere anche il first question in perlfaq6.

Inoltre non sarebbe male leggere tutto perlre mentre ci sei.

Answer 2

Anche senza il/x modificatore, è possibile racchiudere i commenti in (# ...?):

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