For each loop with array
#!/usr/bin/perl use warnings; @array = ("one", "two", "three"); foreach $iterator (@array) { print "The value of the iterator is now $iterator \n"; }