The control structure `foreach' works its way through an array one item at a time.
foreach $item (1, 2, 3 ,4 ,5 ) {
print "Item: $item\n";
}
In this example the array is the numbers from 1 to 5, each is put into the variable `$item' and then printed.
If the item isn't explicitly mentioned, it is stored in the perl default variable $_.
@alphabet = (a..z);
foreach (@alphabet) {
print "$_,";
}
print "\n";