Language Basics Perl

  1. Home
  2. Perl
  3. Language Basics
  4. $SIG{__DIE__}
$SIG{__DIE__} = sub {print "This script is about to die!\n"};
die;