Hi,
Both of these ways to write compressed files fails using store_fd:
open(my $fh, ">:via(Bzip2)", "$fn.bz2") or die "Open $fn.bz2 - $!";
store_fd $dat, $fh;
tie *FH, 'Tie::Gzip' , '>' , "$fn.gz" or die "Open > $fn.gz - $!";
store_fd $dat, FH;
Kind Regards,
Chris Drake