Our Sponsors



Download BioinformaticsOnline(BOL) Apps in your chrome browser.




Wire post by Jit

By Jit 3584 days ago
perl -nle 'if (/^>/) { $sl = 0; print; next } next if ($sl >= 200); $_ = substr($_, 0, 200-$sl) if ($sl + length($_) > 200); $sl += length($_); print;' file.fa >new.fa #Perl #Extract #Fasta