Perl异常而不是返回值

前端之家收集整理的这篇文章主要介绍了Perl异常而不是返回值前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
在一些perl脚本中,我发现自己编写的内容如下:
open(...) or die $!;
print ... or die $!;

等等

我想避免重复自己说或死…在每个可能的例外结束时.

有没有办法强制open()等函数错误时抛出异常,而不仅仅是错误的返回值?然后我可以一次性捕获所有可能的异常.

解决方法

是.它存在一个模块,使那些指令死于错误,它被称为autodie.在脚本的开头添加它.
use autodie;

## It dies.
open my $fh,'<','nonfile.txt';

猜你在找的Perl相关文章