当引用一个undef值而不是仅仅是警告时,你如何让Perl停止并提供堆栈跟踪？好像使用严格不足以达到这个目的.
解决方法
use warnings FATAL => 'uninitialized';
use Carp ();
$SIG{__DIE__} = \&Carp::confess;
第一线使警告致命.当你的程序死机时,接下来的两个会导致堆栈跟踪.
use warnings FATAL => 'uninitialized';
use Carp ();
$SIG{__DIE__} = \&Carp::confess;
第一线使警告致命.当你的程序死机时,接下来的两个会导致堆栈跟踪.