for my $element (@{ $array[2] }) {
    say $element;
}
for my $i (0 .. $#${ $array[2] }) {
    say $array[2]->[ $i ];
}