Question

I need to create a compressed string using Perl that I can uncompress using PHP gzuncompress

I tried the following in Perl

use IO::Compress::Gzip qw(gzip $GzipError) ;
my $input  = 'THIS IS A TEST'; 
my $output;
gzip \$input => \$output;

but PHP cannot uncompress this

If I view the out from perl it is different than if I compressed it using PHP’s gzcompress

Any help in solving this would be much appreciated

Answer 1

Use the compress function from Compress::Zlib.

$ perl -MCompress::Zlib=compress -e 'print compress("Foo Bar\n")' | php -r 'echo gzuncompress(fgets(STDIN));'

Output:

Foo Bar