Lire et écrire au format gzip

Le module PerlIO::gzip est capable et de lire et d'écrire dans le format compressé zip.

use PerlIO::gzip;

open(OUT,">:gzip","file") or die $!;
print OUT"Hello World\n";
close(OUT);

open(IN,"<:gzip","file") or die $!;
print <IN>;
close(IN);