...

/usr/share/doc/perl-Error/examples/warndie.pl