perlスクリプト書くなら
-Wとstrict通るのは最低レベルだろ
てめーそれでもプロか
死ねよ