Help for this page

Select Code to Download


  1. or download this
    use Exception::Class (
    'MyException',
...
        alias  => 'throw_fields',
    },
);
  2. or download this
     
eval{ die { a=>b=>c=>d=>}; } or print %{ $@ };;
c d a b
  3. or download this
      # catch
  if ( $e = Exception::Class->caught('MyException') ) {
...
      $e = Exception::Class->caught();
      ref $e ? $e->rethrow : die $e;
  }