Last active
November 22, 2016 23:14
-
-
Save z448/40290b5a4df4fe36c6a1d52b5d6c2eb8 to your computer and use it in GitHub Desktop.
makes perl script die silently instead of printing "Died at file.pl line.."
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| die bless [], 'Dies'; | |
| package Dies; | |
| use overload '""' => 'dies'; | |
| sub dies { return '' } |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment