Log::Report::Die - compatibility routines with Perl's die/croak/confess


   is an Exporter


 # use internally only


This module is used internally, to translate output of 'die' and Carp functions into Log::Report::Message objects. Also, it tries to convert other kinds of exception frameworks into our message object.


die_decode(STRING, %options)

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 $!.

Returned are four elements: the error string or object which triggered the death originally (the original $@), and the opts, reason, and plain text message. The opts is a HASH which, amongst other things, may contain a stack trace and location extracted from the death text or object.

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

  on_die  'ERROR'
on_die => REASON
exception_decode($exception, %options)

[1.23] This function attempts to translate object of other exception frameworks into information to create a Log::Report::Exception. It returns the same list of parameters as die_decode() does.

Currently supported:

  • DBIx::Class::Exception

  • XML::LibXML::Error


This module is part of Log-Report distribution version 1.34, built on September 15, 2022. Website:


Copyrights 2007-2022 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