Perl中的croak函数
Perl中的croak函数等效于die，不同之处在于它报告调用者上一层。像die一样，此功能也会在将错误报告给STDERR之后退出脚本-
package T;
require Exporter;
@ISA = qw/Exporter/;
@EXPORT = qw/function/;
use Carp;
sub function {
croak "模块错误！";
}
1;当从如下脚本中调用时-
use T; function();
它将产生以下结果-
模块错误！ at test.pl line 4
与鲤鱼一样，根据警告和模具功能，行和文件信息的包含也应遵循相同的基本规则。