@data = unpack "C*", $script;
pack "C*", @data;