my @words = grep defined, /"([^"]*)"|'([^']*)'|(\S+)/g;