$text =~ s/\s+/ /g;