Select Code to Download

$SIG{__DIE__} = sub { print "Died with message '$_[0]'\n"; };
open(NOFILE, '/no/file/here') or die "Ooops: $!";

Died with message 'Ooops: No such file or directory at /home/stephen/t
+est.pl line 2.
'