$status =~ s/(\W+)/ /gs; #Eliminate all non-word characters followed by space.