Help for this page
while (<DATA>) { if (/^>.*predicted_CDS/ ... /^$/) { ... atgaggaagaatgagggtgttgatgatgcagatccactaatagaaggtatgaaggagatc actctgaaagattcagcaactccagaagacaaggatcaagaagacaaacaagatgagaga ggtgaagaaattcaagaacaacctcaagagatgtag
pointo1d@unforgiven:~$ perl tst.pl PEP: >scaffold_2|GENSCAN_predicted_peptide_1|48_aa ... CDS: actctgaaagattcagcaactccagaagacaaggatcaagaagacaaacaagatgagaga CDS: ggtgaagaaattcaagaacaacctcaagagatgtag pointo1d@unforgiven:~$