open(FILE,"gunzip -c $file|") or die "can't open!";

open(my $result,"|gzip >file_name.fq.gz");