programming-examples/perl/Statement/foreach statement.pl

#!/usr/local/bin/perl 

@words = ("Here", "is", "a", "list."); 
foreach $word (@words) { 
   print ("$word\n"); 
}