Log::Report::Die(3) compatibility routines with Perl's die/croak/confess


   is a Exporter



This module is used internally, to translate output of 'die' and Carp functions into Log::Report::Message objects.


The STRING is the content of $@ after an eval() caught a die(). croak(), or confess(). This routine tries to convert this into parameters for Log::Report::report(). This is done in a very smart way, even trying to find the stringifications of $!.

Return are four elements: the error string which is used to trigger a "Log::Report" compatible "die()", and the options, reason, and text message. The options is a HASH which, amongst other things, may contain a stack trace and location.

Translated components will have exception classes "perl", and "die" or "confess". On the moment, the "croak" cannot be distiguished from the "confess" (when used in package main) or "die" (otherwise).

The returned reason depends on whether the translation of the current $! is found in the STRING, and the presence of a stack trace. The following table is used:

  errstr  stack  =>  reason
    no      no       ERROR   (die) application internal problem
    yes     no       FAULT   (die) external problem, think open()
    no      yes      PANIC   (confess) implementation error
    yes     yes      ALERT   (confess) external problem, caught
      = @{$opt{stack}} ? ($opt{errno} ? 'ALERT' : 'PANIC')
      :                  ($opt{errno} ? 'FAULT' : 'ERROR');


Copyrights 2007-2016 by [Mark Overmeer]. For other contributors see ChangeLog.

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. See http://www.perl.com/perl/misc/Artistic.html