p $<.read.count("W")