Select Code to Download

            gunzip \$data => \$out;
            print $out, $/;

<status>connected</status>
?R??0  ????l??????@?
+U?&#1964;??/?%y???p???v?Po#[???-???x?
>\'&#1000;??4'?V.6?6?&#1444;~5Y???0???C]?$?@m~OgQ?u&#451;8?Y?E?8<?Le?4
+?6??&#1644;&qd?x#1

            $collected .= $data;
            gunzip \$collected, \$out;
            print $out, $/;

<status>connected</status>
<quote>
...
    …
</quote>
...

            $collected .= $data;
            gunzip \$collected, \$out, MultiStream => 1;
            print $out, $/;