my @words = split /\s*(,|\s+)/, $query;

##</code><code>##

my @words = split /\s*(?:,|\s+)/, $query;