#! /usr/bin/perl -w
use 5.014;
use Try::Tiny;
#1.检测Try::Tiny是否安装
#perl -e "use Try::Tiny"
#查看 perldoc Try::Tiny 内置模块的帮助文档
#2.使用try catch异常
try {
#2.1 可能会出现异常的代码
my $a = 5 / "w";
} catch {
#如果错误则按执行这里的代码
say "error $@";
} finally {
#不管出不出错这里的代码都执行
print "管你出不出错就是干\n";
}
本文介绍了一个Perl脚本示例,展示了如何使用Try::Tiny模块进行异常处理。通过具体代码演示了try-catch-finally结构的应用,并解释了其工作原理。
4330

被折叠的 条评论
为什么被折叠?



