#! /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"; }