Help for this page

Select Code to Download


  1. or download this
      eval {
    something_that_might_die();
  };
  print "Caught: $@" if $@;
  2. or download this
      die "exception!\n";
  3. or download this
      package Thing;
  sub new { bless {}, shift }
...
    undef $b;
  };
  print "Caught: $@\n" if $@;
  4. or download this
      Thing=HASH(0x811b24c) is dying
  5. or download this
      Thing=HASH(0x811b24c) is dying!
  Caught:         (in cleanup) Thing=HASH(0x811b24c) died