libcarp-always-perl

This module is meant as a debugging aid. It can be used to make a script complain loudly with stack backtraces when warn()ing or die()ing. Here are how stack backtraces produced by this module looks: $ perl -MCarp::Always -e 'sub f { die "arghh" }; sub g { f }; g' arghh at -e line 1 main::f() called at -e line 1 main::g() called at -e line 1 $ perl -MCarp::Always -w -e 'sub f { $a = shift; @a = @$a };' \ -e 'sub g { f(undef) }; g' Use of uninitialized value in array dereference at -e line 1 main::f('undef') called at -e line 2 main::g() called at -e line 2 In the implementation, the Carp module does the heavy work, through 'longmess()'. The actual implementation sets the signal hooks $SIG{__WARN__} and $SIG{__DIE__} to emit the stack backtraces. Also, all uses of 'carp' and 'croak' are made verbose, behaving like 'cluck' and 'confess'.