in reply to Error handling - how much/where/how?
local $SIG{__DIE__} = sub { my $i = -1; while (my @c= caller(++$i)) { print " at $c[1] line $[2]\n"; } };
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: Error handling - how much/where/how? (a plug for Devel::SimpleTrace)
by grinder (Bishop) on Jun 14, 2005 at 07:50 UTC | |
by salva (Canon) on Jun 14, 2005 at 08:37 UTC |