use Modern::Perl;

my @array = qw/een twee drie vier vijf zes zeven/;

for my $index (keys @array) {
    say "$index: $array[$index]";
}