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

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