Help for this page

Select Code to Download


  1. or download this
    erickn@isfe:/home/erickn> cat y 
$SIG{__DIE__} = sub { print $_[0] };
...
erickn@isfe:/home/erickn> perl y
hi at y line 4.
hi at y line 4.
  2. or download this
    erickn@isfe:/home/erickn> cat x

...

erickn@isfe:/home/erickn> perl x
hi at x line 5.