Forget about it. Flip-Flop was okay, just replaced
while ( ($GeneID, $BMB) = each %hash) { print "$GeneID => $BMB[0]\n";
with
foreach my $key (keys %hash) { foreach my $val (@{$hash{$key}}) { print "$key --> $val\n";
and now everything is fine. Thanks for the help
In reply to Re^9: problems with flip flop
by bio25
in thread problems with flip flop
by bio25
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |