5 our $VERSION = '2.26'; # VERSION
7 # This package exists purely so people can inherit from it,
8 # which isn't at all how roles are supposed to work, but it's
9 # how people will use them anyway.
12 # Older Perls don't have a native ->DOES. Let's provide a cheap
15 *DOES = sub { return shift->isa(@_); };
24 autodie::skip - Skip a package when throwing autodie exceptions
28 use parent qw(autodie::skip);
32 This dummy class exists to signal that the class inheriting it should
33 be skipped when reporting exceptions from autodie. This is useful
34 for utility classes like L<Path::Tiny> that wish to report the location
35 of where they were called on failure.
37 If your class has a better way of doing roles, then you should not
38 load this class and instead simply say that your class I<DOES>
39 C<autodie::skip> instead.
43 Copyright 2013, Paul Fenwick <pjf@cpan.org>
47 This module is free software. You may distribute it under the same
52 L<autodie>, L<autodie::exception>
54 =for Pod::Coverage DOES