SET: foreach $hit (@{$matches{$fastaseq}{$sitekey}}) {

##</code><code>##

print "\$hit is: ",$hit,"\n";

##</code><code>##

print "\$hit is: ",$matches{$fastaseq}{$sitekey}[$hit],"\n";

##</code><code>##

foreach my $index ( 0 .. $#array )

##</code><code>##

next if( not defined $hit );