http://qs321.pair.com?node_id=913729


in reply to Re: renaming 1000's of FASTA files
in thread renaming 1000's of FASTA files

Shouldn't this code:

if (exists ($seq_id{$id})) { print ">"; print $seq_id{$fasta_id}; print "\n".$seq."\n"; }

be

if (exists ($seq_id{$id})) { print ">"; print $seq_id{$id}; print "\n".$seq."\n"; }
and

$seq_id{$fasta_id} => $_; be $seq_id{$fasta_id} = $_;

Update: Corrected print $seq_id{$id}; from print $id