Es ist mit grosser Wahrscheinlichkeit *dein* Bug, nicht der von Perl. Man muss schon ein Perl-Profi sein, um einen Perl-Bug zu finden.

Zu deinem Skript: warum lauefst gleichzeitig mit foreach ueber @aa_inet_bk und inkremetierst $i und benutzt dieses $i zum Auslesen von @aa_inet_bk? Und warum wird $i in der inneren Schleife inkrementiert?