($first, $rest) = unpack("A1 A*", $original_string);