Select Code to Download

#!/usr/bin/perl -w

...
 eval { die  "Blah! It's a die command! that goes here" };
 print "dingle dongle goes here\n" 
}

dingle dongle goes here

warn - Hey I told you so with that warning at test_sigdie.pl line 15.
die  - Blah! It's a die command! that goes here at test_sigdie.pl line
+ 16.