open(OUT,"|compress > outfile.Z") or die "Couldn't open pipe to compress: $!";
print OUT "stuff\n"