Toby Inkster > Throwable-Factory-0.006 > Throwable::Factory

Download:
Throwable-Factory-0.006.tar.gz

Dependencies

Annotate this POD

Website

CPAN RT

Open  0
View/Report Bugs
Module Version: 0.006   Source  

NAME ^

Throwable::Factory - lightweight Moo-based exception class factory

SYNOPSIS ^

   use Throwable::Factory
      GeneralException => undef,
      FileException    => [qw( $filename )],
      NetworkException => [qw( $remote_addr $remote_port )],
   ;
   
   # Just a message...
   #
   GeneralException->throw("Something bad happened");
   
   # Or use named parameters...
   #
   GeneralException->throw(message => "Something awful happened");

   # The message can be a positional parameter, even while the
   # rest are named.
   #
   FileException->throw(
      "Can't open file",
      filename => '/tmp/does-not-exist.txt',
   );

   # Or, they all can be a positional using an arrayref...
   #
   NetworkException->throw(["Timed out", "11.22.33.44", 555]);

DESCRIPTION ^

Throwable::Factory is an Exception::Class-like exception factory using MooX::Struct.

All exception classes built using Throwable::Factory are MooX::Struct structs, but will automatically include a message attribute, will compose the Throwable and StackTrace::Auto roles, and contain the following convenience methods:

error

Read-only alias for the message attribute/field.

package

Get the package for the first frame on the stack trace.

file

Get the file name for the first frame on the stack trace.

line

Get the line number for the first frame on the stack trace.

They provide a BUILDARGS method which means that if their constructor is called with an odd number of arguments, the first is taken to be the message, and the rest named parameters.

Additionally, the factory can be called with Exception::Class-like hashrefs to describe the exception classes. The following two definitions are equivalent:

   # MooX::Struct-style
   use Throwable::Factory FooBar => [
      -extends => ['Foo'],
      qw( foo bar ),
   ];
   
   # Exception::Class-style
   use Throwable::Factory FooBar => {
      isa    => 'Foo',
      fields => [qw( foo bar )],
   };

Exception Taxonomy

It can be useful to divide your exceptions into broad categories to allow your caller to catch great swathes of exceptions easily, including new exceptions you add in future versions of your module.

Throwable::Factory includes three exception categories that you may use for this purpose. These are implemented as role packages with no associated methods, so can be tested for using the DOES method (see UNIVERSAL).

It is easy to apply these roles to your exception classes:

   use Throwable::Factory
      ErrTooBig   => [qw( $maximum! -notimplemented )],
      ErrTooSmall => [qw( $minimum! -notimplemented )],
   ;
   use Try::Tiny::ByClass;
   
   sub calculation
   {
      my $input = shift;
      if ($input > 12) {
         ErrTooBig->throw(
            "Inputs over 12 are not currently supported",
            maximum => 12,
         );
      }
      ...;
   }
   
   try {
      calculation(13);
   }
   catch_case [
      +ErrTooBig                            => sub { warn "Too big!" },
      +ErrTooSmall                          => sub { warn "Too small!" },
      "Throwable::Taxonomy::NotImplemented" => sub { warn $_ },
   ];

The -notimplemented shortcut expands to -with => ['Throwable::Taxonomy::NotImplemented']. Similarly -caller and -environment shortcuts exist.

(Note the plus signs in the catch_case above; this ensures ErrTooBig and ErrToString are not auto-quoted by the fat comma.)

CAVEATS ^

Exceptions built by this factory inherit from MooX::Struct; see the CAVEATS section from the MooX::Struct documentation.

BUGS ^

Please report any bugs to http://rt.cpan.org/Dist/Display.html?Queue=Throwable-Factory.

SEE ALSO ^

Exceptions built by this factory inherit from MooX::Struct and compose the Throwable and StackTrace::Auto roles.

This factory is inspired by Exception::Class, and for simple uses should be roughly compatible.

Use Try::Tiny, Try::Tiny::ByClass or TryCatch if you need a try/catch mechanism.

AUTHOR ^

Toby Inkster <tobyink@cpan.org>.

COPYRIGHT AND LICENCE ^

This software is copyright (c) 2012-2013 by Toby Inkster.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.

DISCLAIMER OF WARRANTIES ^

THIS PACKAGE IS PROVIDED "AS IS" AND WITHOUT ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.

syntax highlighting: