Perl の die $!みたいに直近のエラーを吐いて終了させることはできますか？