view release on metacpan or  search on metacpan

lib/DBIO/Exception.pm  view on Meta::CPAN

          'DBIO::Base',
        );

        $msg = "${calling}${msg} ${ln}\n";
    }
    else {
        $msg = Carp::longmess($msg);
    }

    my $self = { msg => $msg };
    bless $self => $class;

    die $self;
}


sub rethrow {
    die shift;
}

1;