Caveat: Different quotes for different folks!
perl -ple"BEGIN{$/=qq'\n>'}s[>? Seq (\d+).*$][$1 : ]m; tr[\n.][]d" in +>out
In reply to Re: How to avoid using array in concatenating string of multiple lines
by BrowserUk
in thread How to avoid using array in concatenating string of multiple lines OR How To Read FASTA
by monkfan
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |