}
#ifdef _USE_KNETFILE
while ((len = knet_read(in->x.fpr, buf, BUF_SIZE)) > 0)
+ fwrite(buf, 1, len, fp->x.fpw);
#else
while (!feof(in->file) && (len = fread(buf, 1, BUF_SIZE, in->file)) > 0)
+ fwrite(buf, 1, len, fp->file);
#endif
- fwrite(buf, 1, len, fp->x.fpw);
free(buf);
fp->block_offset = in->block_offset = 0;
bgzf_close(fp);
}
sub vcf2fq {
- my %opts = (d=>3, D=>100000, Q=>10, l=>10);
+ my %opts = (d=>3, D=>100000, Q=>10, l=>5);
getopts('d:D:Q:l:', \%opts);
die(qq/
Usage: vcfutils.pl vcf2fq [options] <all-site.vcf>