Bạn nhận xét một biểu thức chính quy Perl như thế nào?

Question

Làm cách nào để bạn đưa các nhận xét vào trong biểu thức chính quy Perl?

Answer 1

Sử dụng/x modifier:

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

Cũng thấy first question trong perlfaq6.

Ngoài ra, bạn sẽ không bị tổn thương khi đọc tất cả perlre khi bạn đang ở đó.

Answer 2

Thậm chí nếu không có sự/x sửa đổi, bạn có thể gửi kèm theo chú thích trong (# ...?):

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