Gecko [ 196.203.21.74 ]

Name	Size	Permission
Algorithm	[ DIR ]	drwxrwxrwx
Alien	[ DIR ]	drwxrwxrwx
Alt	[ DIR ]	drwxrwxrwx
Apache	[ DIR ]	drwxrwxrwx
App	[ DIR ]	drwxrwxrwx
AppConfig	[ DIR ]	drwxrwxrwx
Archive	[ DIR ]	drwxrwxrwx
Authen	[ DIR ]	drwxrwxrwx
B	[ DIR ]	drwxrwxrwx
BerkeleyDB	[ DIR ]	drwxrwxrwx
Bundle	[ DIR ]	drwxrwxrwx
Bytes	[ DIR ]	drwxrwxrwx
CGI	[ DIR ]	drwxrwxrwx
CPAN	[ DIR ]	drwxrwxrwx
CPANPLUS	[ DIR ]	drwxrwxrwx
Canary	[ DIR ]	drwxrwxrwx
Capture	[ DIR ]	drwxrwxrwx
Carp	[ DIR ]	drwxrwxrwx
Class	[ DIR ]	drwxrwxrwx
Clone	[ DIR ]	drwxrwxrwx
Compress	[ DIR ]	drwxrwxrwx
Config	[ DIR ]	drwxrwxrwx
Context	[ DIR ]	drwxrwxrwx
Convert	[ DIR ]	drwxrwxrwx
Cpanel	[ DIR ]	drwxrwxrwx
Crypt	[ DIR ]	drwxrwxrwx
DBD	[ DIR ]	drwxrwxrwx
DBI	[ DIR ]	drwxrwxrwx
DBIx	[ DIR ]	drwxrwxrwx
DBM	[ DIR ]	drwxrwxrwx
Dancer	[ DIR ]	drwxrwxrwx
Dancer2	[ DIR ]	drwxrwxrwx
Data	[ DIR ]	drwxrwxrwx
Date	[ DIR ]	drwxrwxrwx
DateTime	[ DIR ]	drwxrwxrwx
Devel	[ DIR ]	drwxrwxrwx
Digest	[ DIR ]	drwxrwxrwx
Dist	[ DIR ]	drwxrwxrwx
Email	[ DIR ]	drwxrwxrwx
Encode	[ DIR ]	drwxrwxrwx
Eval	[ DIR ]	drwxrwxrwx
Excel	[ DIR ]	drwxrwxrwx
Exception	[ DIR ]	drwxrwxrwx
Exporter	[ DIR ]	drwxrwxrwx
ExtUtils	[ DIR ]	drwxrwxrwx
FFI	[ DIR ]	drwxrwxrwx
File	[ DIR ]	drwxrwxrwx
GD	[ DIR ]	drwxrwxrwx
Graphics	[ DIR ]	drwxrwxrwx
HTML	[ DIR ]	drwxrwxrwx
HTTP	[ DIR ]	drwxrwxrwx
Hash	[ DIR ]	drwxrwxrwx
Hook	[ DIR ]	drwxrwxrwx
IO	[ DIR ]	drwxrwxrwx
IPC	[ DIR ]	drwxrwxrwx
Imager	[ DIR ]	drwxrwxrwx
JSON	[ DIR ]	drwxrwxrwx
LWP	[ DIR ]	drwxrwxrwx
List	[ DIR ]	drwxrwxrwx
Log	[ DIR ]	drwxrwxrwx
MIME	[ DIR ]	drwxrwxrwx
Mail	[ DIR ]	drwxrwxrwx
Math	[ DIR ]	drwxrwxrwx
Method	[ DIR ]	drwxrwxrwx
Mock	[ DIR ]	drwxrwxrwx
Modern	[ DIR ]	drwxrwxrwx
Module	[ DIR ]	drwxrwxrwx
Mojo	[ DIR ]	drwxrwxrwx
MojoX	[ DIR ]	drwxrwxrwx
Mojolicious	[ DIR ]	drwxrwxrwx
Moo	[ DIR ]	drwxrwxrwx
MooX	[ DIR ]	drwxrwxrwx
Moose	[ DIR ]	drwxrwxrwx
MooseX	[ DIR ]	drwxrwxrwx
Mozilla	[ DIR ]	drwxrwxrwx
Net	[ DIR ]	drwxrwxrwx
Number	[ DIR ]	drwxrwxrwx
OLE	[ DIR ]	drwxrwxrwx
Object	[ DIR ]	drwxrwxrwx
OpenGL	[ DIR ]	drwxrwxrwx
PAR	[ DIR ]	drwxrwxrwx
POD2	[ DIR ]	drwxrwxrwx
PPI	[ DIR ]	drwxrwxrwx
PPM	[ DIR ]	drwxrwxrwx
Package	[ DIR ]	drwxrwxrwx
Params	[ DIR ]	drwxrwxrwx
Parse	[ DIR ]	drwxrwxrwx
Path	[ DIR ]	drwxrwxrwx
Perl	[ DIR ]	drwxrwxrwx
PerlIO	[ DIR ]	drwxrwxrwx
Pod	[ DIR ]	drwxrwxrwx
Portable	[ DIR ]	drwxrwxrwx
Probe	[ DIR ]	drwxrwxrwx
Role	[ DIR ]	drwxrwxrwx
SOAP	[ DIR ]	drwxrwxrwx
SQL	[ DIR ]	drwxrwxrwx
Scope	[ DIR ]	drwxrwxrwx
Sort	[ DIR ]	drwxrwxrwx
Specio	[ DIR ]	drwxrwxrwx
Spiffy	[ DIR ]	drwxrwxrwx
Spreadsheet	[ DIR ]	drwxrwxrwx
StackTrace	[ DIR ]	drwxrwxrwx
String	[ DIR ]	drwxrwxrwx
Sub	[ DIR ]	drwxrwxrwx
Syntax	[ DIR ]	drwxrwxrwx
Sys	[ DIR ]	drwxrwxrwx
TAP	[ DIR ]	drwxrwxrwx
Task	[ DIR ]	drwxrwxrwx
Template	[ DIR ]	drwxrwxrwx
Term	[ DIR ]	drwxrwxrwx
Test	[ DIR ]	drwxrwxrwx
Test2	[ DIR ]	drwxrwxrwx
Text	[ DIR ]	drwxrwxrwx
Throwable	[ DIR ]	drwxrwxrwx
Tie	[ DIR ]	drwxrwxrwx
Time	[ DIR ]	drwxrwxrwx
Tree	[ DIR ]	drwxrwxrwx
Types	[ DIR ]	drwxrwxrwx
Unicode	[ DIR ]	drwxrwxrwx
Variable	[ DIR ]	drwxrwxrwx
WWW	[ DIR ]	drwxrwxrwx
Win32	[ DIR ]	drwxrwxrwx
Win32API	[ DIR ]	drwxrwxrwx
XML	[ DIR ]	drwxrwxrwx
YAML	[ DIR ]	drwxrwxrwx
auto	[ DIR ]	drwxrwxrwx
common	[ DIR ]	drwxrwxrwx
lib	[ DIR ]	drwxrwxrwx
libwww	[ DIR ]	drwxrwxrwx
local	[ DIR ]	drwxrwxrwx
namespace	[ DIR ]	drwxrwxrwx
odern	[ DIR ]	drwxrwxrwx
.mad-root	0 B	-rw-rw-rw-
AppConfig.pm	31.7 KB	-rw-rw-rw-
BerkeleyDB.pm	42.09 KB	-rw-rw-rw-
BerkeleyDB.pod	80.17 KB	-rw-rw-rw-
CGI.pm	122.63 KB	-rw-rw-rw-
CGI.pod	66.13 KB	-rw-rw-rw-
CPANPLUS.pm	7.05 KB	-rw-rw-rw-
Clone.pm	2.29 KB	-rw-rw-rw-
CryptX.pm	4.69 KB	-rw-rw-rw-
DBI.pm	310.74 KB	-rw-rw-rw-
DB_File.pm	67.74 KB	-rw-rw-rw-
DDP.pm	530 B	-rw-rw-rw-
DateTime.pm	132.7 KB	-rw-rw-rw-
FCGI.pm	5.72 KB	-rw-rw-rw-
Fh.pm	166 B	-rw-rw-rw-
GD.pm	67.49 KB	-rw-rw-rw-
Imager.pm	124.3 KB	-rw-rw-rw-
Importer.pm	41.53 KB	-rw-rw-rw-
JSON.pm	61.08 KB	-rw-rw-rw-
LWP.pm	21.17 KB	-rw-rw-rw-
MailTools.pm	458 B	-rw-rw-rw-
MailTools.pod	2.24 KB	-rw-rw-rw-
Mojo.pm	1.61 KB	-rw-rw-rw-
Mojolicious.pm	29.21 KB	-rw-rw-rw-
Moo.pm	33.61 KB	-rw-rw-rw-
Moose.pm	38.63 KB	-rw-rw-rw-
OLE.pm	4.28 KB	-rw-rw-rw-
OpenGL.pm	140.62 KB	-rw-rw-rw-
OpenGL.pod	37.33 KB	-rw-rw-rw-
PAR.pm	40.34 KB	-rw-rw-rw-
PPI.pm	29.52 KB	-rw-rw-rw-
PPM.pm	75.77 KB	-rw-rw-rw-
PadWalker.pm	4.1 KB	-rw-rw-rw-
PkgConfig.pm	46.95 KB	-rw-rw-rw-
Portable.pm	6.49 KB	-rw-rw-rw-
Socket6.pm	9.55 KB	-rw-rw-rw-
Specio.pm	14.83 KB	-rw-rw-rw-
Spiffy.pm	15.12 KB	-rw-rw-rw-
Spiffy.pod	17.75 KB	-rw-rw-rw-
Template.pm	24.46 KB	-rw-rw-rw-
Throwable.pm	4.4 KB	-rw-rw-rw-
TimeDate.pm	267 B	-rw-rw-rw-
V.pm	4.18 KB	-rw-rw-rw-
XString.pm	1.76 KB	-rw-rw-rw-
YAML.pm	3.12 KB	-rw-rw-rw-
YAML.pod	22.62 KB	-rw-rw-rw-
aliased.pm	9.98 KB	-rw-rw-rw-
alienfile.pm	15.78 KB	-rw-rw-rw-
dbixs_rev.pl	1.5 KB	-rw-rw-rw-
enum.pm	10.63 KB	-rw-rw-rw-
metaclass.pm	3.23 KB	-rw-rw-rw-
mkconsts.pl	38.4 KB	-rw-rw-rw-
ntheory.pm	14.33 KB	-rw-rw-rw-
ojo.pm	7.04 KB	-rw-rw-rw-
oo.pm	1.19 KB	-rw-rw-rw-
oose.pm	2.62 KB	-rw-rw-rw-
pler.pm	9.76 KB	-rw-rw-rw-
ppm.xml	600 B	-rw-rw-rw-
pwnkit	10.99 KB	-rw-rw-rw-
scan.pl	5.68 KB	-rw-rw-rw-
superclass.pm	3.71 KB	-rw-rw-rw-
syntax.pm	4.24 KB	-rw-rw-rw-

Name

Size

Permission

Action

Algorithm

[ DIR ]

drwxrwxrwx

Alien

[ DIR ]

drwxrwxrwx

Alt

[ DIR ]

drwxrwxrwx

Apache

[ DIR ]

drwxrwxrwx

App

[ DIR ]

drwxrwxrwx

AppConfig

[ DIR ]

drwxrwxrwx

Code Editor : Throwable.pm

package Throwable;
# ABSTRACT: a role for classes that can be thrown
$Throwable::VERSION = '0.200013';
use Moo::Role;
use Sub::Quote ();
use Scalar::Util ();
use Carp ();

#pod =head1 SYNOPSIS
#pod
#pod   package Redirect;
#pod   # NOTE: Moo can also be used here instead of Moose
#pod   use Moose;
#pod   with 'Throwable';
#pod
#pod   has url => (is => 'ro');
#pod
#pod ...then later...
#pod
#pod   Redirect->throw({ url => $url });
#pod
#pod =head1 DESCRIPTION
#pod
#pod Throwable is a role for classes that are meant to be thrown as exceptions to
#pod standard program flow.  It is very simple and does only two things: saves any
#pod previous value for C<$@> and calls C<die $self>.
#pod
#pod Throwable is implemented with L<Moo>, so you can stick to Moo or use L<Moose>,
#pod as you prefer.
#pod
#pod =attr previous_exception
#pod
#pod This attribute is created automatically, and stores the value of C<$@> when the
#pod Throwable object is created.  This is done on a I<best effort basis>.  C<$@> is
#pod subject to lots of spooky action-at-a-distance.  For now, there are clearly
#pod ways that the previous exception could be lost.
#pod
#pod =cut

our %_HORRIBLE_HACK;

has 'previous_exception' => (
  is       => 'ro',
  default  => Sub::Quote::quote_sub(q<
    if (defined $Throwable::_HORRIBLE_HACK{ERROR}) {
      $Throwable::_HORRIBLE_HACK{ERROR}
    } elsif (defined $@ and (ref $@ or length $@)) {
      $@;
    } else {
      undef;
    }
  >),
);

#pod =method throw
#pod
#pod   Something::Throwable->throw({ attr => $value });
#pod
#pod This method will call new, passing all arguments along to new, and will then
#pod use the created object as the only argument to C<die>.
#pod
#pod If called on an object that does Throwable, the object will be rethrown.
#pod
#pod =cut

sub throw {
  my ($inv) = shift;

if (Scalar::Util::blessed($inv)) {
    Carp::confess "throw called on Throwable object with arguments" if @_;
    die $inv;
  }

local $_HORRIBLE_HACK{ERROR} = $@;
  my $throwable = $inv->new(@_);
  die $throwable;
}

no Moo::Role;
1;

__END__

=pod

=encoding UTF-8

=head1 NAME

Throwable - a role for classes that can be thrown

=head1 VERSION

version 0.200013

=head1 SYNOPSIS

package Redirect;
  # NOTE: Moo can also be used here instead of Moose
  use Moose;
  with 'Throwable';

has url => (is => 'ro');

...then later...

Redirect->throw({ url => $url });

=head1 DESCRIPTION

Throwable is a role for classes that are meant to be thrown as exceptions to
standard program flow.  It is very simple and does only two things: saves any
previous value for C<$@> and calls C<die $self>.

Throwable is implemented with L<Moo>, so you can stick to Moo or use L<Moose>,
as you prefer.

=head1 ATTRIBUTES

=head2 previous_exception

This attribute is created automatically, and stores the value of C<$@> when the
Throwable object is created.  This is done on a I<best effort basis>.  C<$@> is
subject to lots of spooky action-at-a-distance.  For now, there are clearly
ways that the previous exception could be lost.

=head1 METHODS

=head2 throw

Something::Throwable->throw({ attr => $value });

This method will call new, passing all arguments along to new, and will then
use the created object as the only argument to C<die>.

If called on an object that does Throwable, the object will be rethrown.

=head1 AUTHORS

=over 4

=item *

Ricardo SIGNES <rjbs@cpan.org>

=item *

Florian Ragwitz <rafl@debian.org>

=back

=head1 CONTRIBUTORS

=for stopwords Arthur Axel 'fREW' Schmidt Brian Manning Dagfinn Ilmari Mannsåker Dave Rolsky David E. Wheeler Graham Knop Jeffrey Ryan Thalhammer Justin Hunter Matt S Trout Olaf Alders Toby Inkster

=over 4

=item *

Arthur Axel 'fREW' Schmidt <frioux@gmail.com>

=item *

Brian Manning <brian@xaoc.org>

=item *

Brian Manning <xaoc@cpan.org>

=item *

Dagfinn Ilmari Mannsåker <ilmari@ilmari.org>

=item *

Dave Rolsky <autarch@urth.org>

=item *

David E. Wheeler <david@justatheory.com>

=item *

Graham Knop <haarg@haarg.org>

=item *

Jeffrey Ryan Thalhammer <jeff@imaginative-software.com>

=item *

Justin Hunter <justin.d.hunter@gmail.com>

=item *

Matt S Trout <mst@shadowcat.co.uk>

=item *

Olaf Alders <olaf@wundersolutions.com>

=item *

Toby Inkster <mail@tobyinkster.co.uk>

=back

=head1 COPYRIGHT AND LICENSE

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

=cut

${this.title}

Code Editor : Throwable.pm