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