unpack "C*",$str