>>823
>>822のコードでは何もして無い。こんな効果が
WRITE_HOGE: {
  open my $fh, ">", $file
    or do {
      last WRITE_HOGE; # とかやると
    };
  通常の処理
} # エラー時にここまでジャンプする
あるけれど、822ではブロック自体に名前をつけて解りやすくするという意味でつけた。