Perl 教程 之 Perl 错误处理 7

Perl 教程 之 Perl 错误处理 7

Perl 错误处理

程序运行过程中，总会碰到各式各样的错误，比如打开一个不存在的文件。

程序运行过程中如果出现错误就会停止，我们就需要使用一些检测方法来避免错误，从而防止程序退出。

Perl 提供了多中处理错误发方法，接下来我们一一介绍。

croak 函数

croak() 与 die() 一样，可以结束脚本。

package T;

require Exporter;
@ISA = qw/Exporter/;
@EXPORT = qw/function/;
use Carp;

sub function {
croak "Error in module!";
}
1;
在脚本调用以下程序:

use T;
function();
执行以上程序，输出结果为：

Error in module! at test.pl line 4