Try::Tiny使ってみてる

my $res = eval { ... };
if (my $e = $@) {
    ...;
}

1人のときは↑のように書くことが多かった。
ただ会社のみんながTry::Tinyを使ってるので、使っとくかと思ったけど、みんなこんな感じで書いてる。

my ($res);
try {
    $res = ...;
} catch {
    ...;
};

それ、こう書けるんじゃね？って思ったけど、dieしたときcatchの中身が返ってくるようだった。

my $res = try {
    ...;
} catch {
    ...;
};