perltidyでコードを整形するようにしました
定数を別ファイルに切り分け
無条件で全モジュールをrequireするようにしました
各ファイルをperlモジュール化