#! /usr/bin/perl
for $marx ('Groucho', 'Harpo', 'Zeppo', 'Chico') {
	print "$marx is my favorite Marx brother.\n";
}