Perlで最高のファイルロック方法を考えた！
データファイルが複数でも無問題！
可能な限り同時にロックする！