Help for this page
print "Letters are >>@letters<<\n";
foreach my $letter (@letters) { print "Got letter '$letter'\n"; };
for my $i (0..$#letters) { print "Flag $i is $letters[$i]\n"; };