perlでは何も宣言せずに使用すると、グローバル変数になります。