$text =~ tr/A-z0-9.,;'?!":$\n\t\r -//dc;
$text =~ s/\s+/ /g;