p$_.count$&while$><<" %s "%putc(gets)[/.$/]