try catch

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