Help for this page

Select Code to Download


  1. or download this
    $ perl -Mstrict -wE'$SIG{__DIE__}=sub{last}; die "hi"'
Exiting subroutine via last at -e line 1.
...
# put last in a non-loop block, dies
$ perl -e'$SIG{__DIE__}=sub{{last}}; die "hi"'
hi at -e line 1.
  2. or download this
    $ perl --version

This is perl 5, version 38, subversion 2 (v5.38.2) built for x86_64-ms
+ys-thread-multi