HTTP Contend encoding gzip => decomprimieren

[Andreas Korthaus]

Hi!

my $ua = new LWP::UserAgent;
my $request = new HTTP::Request('GET', $url);
$response = $ua->request($request);
print decompress($response->content());

hat jemand eine idee?

Soweit ich mich erinnere wird bei "Contend-Encoding: gzip" in die ersten 10 Byte irgendwelche Zusatzinformationen geschrieben, das heißt Du musst die ersten 10 Zeichen aus dem gz-String entfernen, und erst dann (den Rest) dekomprimieren. Ich kenne mich mit den PERL-Funktionen/Modulen nicht aus, in PHP verwendet man glaube ich nicht decompress sondern gzinflate, vielleicht ist das in PERL ja auch was anderes.

Grüße
Andreas