Duplicar posible:
How do I force a stack backtrace for all fatal errors in Perl?¿Cómo puedo obtener un rastreo en Perl?
Una de las cosas que me gustan de Python, es que cuando un script finaliza debido a un error, que escupe un rastreo. Me pregunto si de todos modos hay un Perl que haga esto también.
añadir esto a la parte superior de la secuencia de comandos:
use Carp 'verbose';
$SIG{ __DIE__ } = sub { Carp::confess(@_) };
Se va a crear un seguimiento de pila de todos los errores fatales.
También puede hacer que '$ SIG {__ DIE__} = \ & Carp :: confess;' –
Esta respuesta realmente es mucho mejor que en la pregunta que se considera un duplicado de este. – EMiller
Investigue el módulo Carp::Always.
'Carp :: Always' es un método mucho mejor que jugar con sigdie porque puedes habilitarlo desde la línea de comando. 'perl -MCarp :: Always my_script' Muy, muy agradable. – daotoad
Puse '#!/C/Perl/bin/perl -MCarp :: Always -w' como la primera línea del script. Y dijo 'Demasiado tarde para' la opción '-MCarp :: Always' en ... la línea 1. ' –
Dupe: http://stackoverflow.com/questions/738628. Además, http://stackoverflow.com/questions/1877638 y http://stackoverflow.com/questions/971273 – mob