Just one minor note to add: In Perl, foreach is just an alternate spelling of for. This can also be written as (and I would write it as) for my $i ('A' .. 'D')