for my $i (0..$#tablea) {