Perl异常而不是返回值

Perl 2019-05-07

在一些perl脚本中,我发现自己编写的内容如下：

open(...) or die $!;
print ... or die $!;

等等

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

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

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

use autodie;

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

忍不住在 PerlChina 邮件列表中盘点了一下 Perl 里的 Web 应用框架（巧的是 PerlBuzz 最近也有一篇相关...

perl中bless的理解

bless有两个参数：对象的引用、类的名称。类的名称是一个字符串，代表了类的类型信息，这是理解bless的...

PERL GB2312 UTF-8 编码转换

gb2312转Utf的方法： use Encode; my $str = "中文"; $str_cnsoftware = encode("utf-8...

perl 计算硬盘利用率

perl 计算硬盘利用率，以%来查看硬盘资源是否存在IO消耗cpu资源情况；部份代码参考了iostat源码；...

perl之变量

1 简单变量 Perl 的 Hello World 是怎么写的呢？请看下面的程序： #!/usr/bin/perl print "Hello W...

perl的简单语法

本文介绍Perl的Perl的简单语法，包括基本输入输出、分支循环控制结构、函数、常用系统调用和文件操作，...

相关文章