Perl 教程 之 Perl 错误处理 8
Perl 错误处理
程序运行过程中,总会碰到各式各样的错误,比如打开一个不存在的文件。
程序运行过程中如果出现错误就会停止,我们就需要使用一些检测方法来避免错误,从而防止程序退出。
Perl 提供了多中处理错误发方法,接下来我们一一介绍。
confess 函数
confess() 与 die() 类似,但提供了从产生错误处的栈回溯追踪。
package T;
require Exporter;
@ISA = qw/Exporter/;
@EXPORT = qw/function/;
use Carp;
sub function {
confess "Error in module!";
}
1;
在脚本调用以下程序:
use T;
function();
执行以上程序,输出结果为:
Error in module! at T.pm line 9
T::function() called at test.pl line 4