for my $i (0..$#letters) {
    print "Flag $i is $letters[$i]\n";
};