Help for this page
>perl script.pl Match: GNN at 7 ... Match: GNN at 7 Match: GNN at 7 ...
use strict; use warnings; ... ); pos($seq{$k}) = $saved_pos; }