http://www.rfs.jp/sb/perl/05/goto.html

なんかラベルなんていらねって書いてあるけど、CGIでは結構使いところあるけどなぁ。
初めから設計通りに作るとかじゃなく、その場その場でどんどん機能が追加されていく場合に
数行処理をふっ飛ばしたいとか、多分多くの人がifとか$error = 1とかでやるところも
gotoでもっと簡単にできるのにって思った。

詳しい人にすっごい突っ込まれそう。
怖いがちょっと突っ込まれてみたいかも