例だとundefなのは当然なので、こうかな? perl -e 'eval { local $@; eval { die "goro" }; if ( $@ ) { die $@ } }; warn $@'

makamaka_at_donzokomakamaka_at_donzoko のブックマーク 2009/08/05 15:03

その他

このブックマークにはスターがありません。
最初のスターをつけてみよう!

tokuhirom blog

    Blog Search when-present<#else>when-missing. (These only cover the last step of the expression; to cover the whole expression, use parenthesis: (myOptionalVar.foo)!myDefault, (myOptionalVar.foo)?? ...

    \ コメントが サクサク読める アプリです /

    • App Storeからダウンロード
    • Google Playで手に入れよう