Help for this page

Select Code to Download


  1. or download this
    perl -D512 -e '$_ = "f\n";/.*\z/'
Compiling REx `.*\z'
...
                            failed...
Match failed
Freeing REx: `".*\\z"'
  2. or download this
    perl -D512 -e '$_ = "f\n";/.*\z/s'
Compiling REx `.*\z'
...
> <>              |  4:    END
Match successful!
Freeing REx: `".*\\z"'
  3. or download this
      Setting an EVAL scope, savestack=6
   2 <f
> <>              |  3:    EOS
   2 <f
> <>              |  4:    END