$words = param('words');
$words=~s/\s+//g;
$words=~s/\r/,/g;
$words=~s/\n/,/g;

#comma delimited user input
@words = split(/,/, $words);