Help for this page

Select Code to Download


  1. or download this
    >perl -le"print qr/foo/"
(?-xism:foo)

>perl -le"print qr/foo/m"
(?m-xis:foo)
  2. or download this
    >perl588 -le"$re=qr/a$/; print $re; print qq{a\nb\n}=~/$re/m ?1:0"
(?-xism:foo$)
...
>perl5100 -le"$re=qr/a$/; print $re; print qq{a\nb\n}=~/$re/m ?1:0"
(?-xism:foo$)
0