.. -*- coding: utf-8; -*- .. include:: HEADER.rst ======= Perl. ======= .. contents:: Print stack trace in Perl. ========================== :: use Devel::StackTrace; my $trace = Devel::StackTrace->new; print $trace->as_string; # like carp