[Perl] mkdirでパーミッション777にならない

mkdir "[dir_path]", 0777 or die &procEnd("[WARNING]error:mkdir 0777 [dir_path]");

↑で 777ディレクトリが作れなくて ﾅﾝﾃﾞｼﾞｬﾎﾞｹｰ(# ﾟДﾟ)ｺﾗｰ って暴れてたら

perlでmkdirするときは umask設定を解除しないとダメらしいとのこと。ぐはー！！

↓魔法の言葉

umask(0);

mkdir ～～

参考）http://perl.g.hatena.ne.jp/Cress/20080611/1213184541

アリガトウゴザイマス<(＿ ＿)>