[root@devel3 root]# cat test.pl 
#!/usr/bin/perl
use Compress::Zlib;
my $str = "Hello World!";
my $gzip = Compress::Zlib::memGzip( $str );
my $hex_enc = unpack 'H*', $gzip;
my $hex_dec_gzip = pack 'H*', $hex_enc;
my $str_dec = Compress::Zlib::memGunzip( $hex_dec_gzip );
print "
$str
$hex_enc
$str_dec
";
[root@devel3 root]# ./test.pl

Hello World!
1f8b0800000000000003f348cdc9c95708cf2fca49510400a31c291c0c000000
Hello World!
[root@devel3 root]#