Brian Medley > Died-0.02 > Died

Download:
Died-0.02.tar.gz

Dependencies

Annotate this POD

CPAN RT

New  1
Open  0
View/Report Bugs
Module Version: 0.02   Source  

NAME ^

Died - Auto create blessed exceptions

SYNOPSIS ^

    package OldCode;

    use Died;

    sub inuse {
        eval {
            maintenace();
        };
        if ($@) {
            die;
        }
    }

    sub maintenace {
        die("Use the source!\n");
    }

    package main;

    use Died;
    use English;
    use Modern::Perl;

    eval {
        OldCode::inuse;
    };
    if ($EVAL_ERROR) {
        say($EVAL_ERROR->file, "\t", $EVAL_ERROR->line);
    }

DESCRIPTION ^

Died will auto create exception handling objects.

The goal is to make it easer to use with maintenance code.

syntax highlighting: