$text =~ s/[\s|\n]*//g;