2008-09-28 アホすぎるw Perl どうも、サブルーチンに読み込もうとしてた引数が読み込めないと思ってたら…。 my ($id, $more) = shift;shiftとかwwwwそりゃ読めないwwww 勿論@_じゃないとダメです、ハイ。 orz