<div dir="ltr">On 6 June 2010 15:53, Peter Gordon <span dir="ltr">&lt;<a href="mailto:peter@pg-consultants.com">peter@pg-consultants.com</a>&gt;</span> wrote:<br><blockquote class="gmail_quote" style="margin-top: 0px; margin-right: 0px; margin-bottom: 0px; margin-left: 0.8ex; border-left-width: 1px; border-left-color: rgb(204, 204, 204); border-left-style: solid; padding-left: 1ex; ">

I have a trivial program shown below. In order to better debug an<br>application I would like to be able to obtain a stack trace.</blockquote><div> </div>To get a formatted one, a la Carp::confess, as a string:<div><br></div>

<div>    my $stacktrace = Carp::longmess();</div><div><br></div><div><div>To make Carp::croak behave like Carp::confess:</div><div><br></div><div>    perl -MCarp=verbose ...</div><div><br></div></div><div>To make every $SIG{__DIE__} become a Carp::confess:</div>

<div><br></div><div>    perl -MCarp::Always ...</div><div><br></div><div><div>Finally, to get an more useful stacktrace (that you can both format and inspect programatically), look at Devel::StackTrace.</div></div></div>