ae.embl
FT CDS complement(join(18028..18116,19351..20668))
FT /locus_tag="bb01_0004"
FT /note="go_function: nutrient reservoir activity
"
FT /codon_start=1
FT
o.embl
FT b.Brucel_chr4.gb"
FT CDS complement(join(17937..18025,19259..20576))
FT /note="none"
FT /locus_tag="bb01_0004"
The above are parts of an embl files that in need to read as arrays.
If you note the locus tag are the same but one has a note and the other doesn't.
I need to be able to read as arrays in perl, locate the same number used by
locus tags and the copy the note to the one that does not have the note remarks.
give me code pls.