The standard Carp module has what you request. Look for croak() and confess() for dying.

japhy -- Perl and Regex Hacker