@myNames = ('Larry jackson', 'Curly jackson', 'Moe Sanders');
 print "Who's on the list:\n"; 
 foreach (@myNames)
 {
        if($_ =~ "jackson")
 	print $_ . "\n";
 }