programming-examples/perl/Statement/Using foreach to loop through an array without using the default value.pl

#!/usr/bin/perl -w

use strict;

my $element;

foreach $element ('zero', 'one', 'two') {
    print "the element is: $element\n";
}