print "Enter words separated by commas.";
my $answer=<STDIN>;