foreach my $elem1 (@array1) {
    my $outer_idx = $.;
    foreach my $elem2 (@array2) {
        my $inner_idx = $.;
        
        # Blablabla...
    }
}