Perlはブロックスコープで変数宣言必須なのがいい