Select Code to Download

#!/usr/bin/env perl

...
    # You can rethrow the exception with your own like MyException her
+e
    die "ERROR: division by zero\n$e\n"
  }

#!/usr/bin/env perl

...
     $e = Exception::Class->caught();
     ref $e ? $e->rethrow : die $e;
  }