在Perl中处理异常的最佳方式是什么?

我注意到,Exception.pm和Error.pm在Perl社区似乎没有被广泛使用。是否因为异常处理引起的eval的大量占用?

一般来说,Perl程序似乎有更宽松的关于异常处理的政策。这是否有引人注目的理由?

无论如何,Perl中异常处理的最佳方法是什么?

Perl社区的共识似乎是Try::Tiny是做异常处理的首选方式。您所提及的“宽大政策”可能是由于以下组合:

> Perl不是一个完全面向对象的语言。 (例如,与其中的Java相反
你不能避免处理异常。)
>许多Perl开发人员的背景。 (像C1和shell这样的语言没有
异常机制)
>人们倾向于使用Perl的任务。 (文字的小脚本和
报表生成,不需要异常处理。)
> Perl没有(很好的)内置的异常机制。

请注意,最后一个项目意味着您会看到很多代码,如下所示:

eval { something() };
if ($@) {
    warn "Oh no! [$@]\n";
}

这是异常处理,即使它不使用try / catch语法。然而,它是脆弱的,并将在许多微妙的边缘案例中大多数人没有想到。 Try :: Tiny和CPAN上的其他异常处理模块都是为了更容易获得正确的。

1. C有setjmp()和longjmp(),可以用于非常粗体的异常处理形式。

http://stackoverflow.com/questions/4006267/what-is-the-best-way-to-handle-exceptions-in-perl

本站文章除注明转载外,均为本站原创或编译
转载请明显位置注明出处:在Perl中处理异常的最佳方式是什么?