Select Code to Download

$ perl5010 -le'
   $re = qr/foo$/;
...
'
(?-xism:foo$)   # -m: Turn /m off.
0

$ perl5008009 -le'
   $re = qr/foo$/;
...
'
(?-xism:foo$)
1               # Matched as if /m was on for the subpattern.

$ perl5008009 -le'
   $re = qr/foo$/;
...
'
(?-xism:foo$)
1