Whoops, that writing doesn't quite work (it prints the compressed data to STDOUT), and I'm not sure how to fix that without invoking the shell.

With the shell, it goes something like this:

open my $out, '| gzip -c > ' . $filename;
[download]