$words = param('words');
$words=~tr/\r\n/,/;
$words=~s/\s+//g;
#comma delimited user input
@words = split(/,+/, $words);