#!/usr/local/bin/perl

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