PERLは昔自分の書いた物が、何をしているのかわからなくなる(;´Д`)