配列に入れるんならunpack("A*",$_)とかしたほうがよくね?