Re: How to decode this "gzinflate (base64_decode(***

[rafl]

There's the MIME::Base64 module to decode the base64 data and the Compress::Zlib module to inflate the result.

[Zeokat]

I tryed but i canīt find the solution... donīt know enougth perl.

[rafl]

Put together from the synopsis of those two pages I linked to, but untested:

use MIME::Base64;
use Compress::Zlib;

my $output = Compress::Zlib::memGunzip(decode_base64($input));

[Zeokat]

#!/usr/bin/perl -w
use strict;

use MIME::Base64;
use Compress::Zlib;

my $input = '******code*****';
my $output = Compress::Zlib::memGunzip(decode_base64($input));
print $output;

No luck at all.... i surrender. Thanks for all rafl.