$text =~ s/ / /g;