perl - 进行以下 Perl eval 防弹证明需要进行哪些更改(如果有)？

Question

eval {
    # here is put some code that may throw exception
    return 1;
} or do {
   my $error = $@;
   # Handle error.
};

以下样式是否防止未设置 $@
正确吗？

下面的“1”是什么意思？防范？

“or do{” 比“if ($@){”更好吗？如果是这样，为什么？

Answer 1

请参阅 Try::Tiny 文档以讨论使用 eval 作为 try -type 语句时可能出错的事情、如何避免它们以及为什么您发布的代码以 1 结尾(以确保 eval 块在完成时返回真值成功地)。

阅读后，请考虑使用 Try::Tiny 而不是通过所有的循环来确保您的每个 eval s 都能作为 try 正确运行。毕竟，懒惰是程序员的 first great virtue。