$_=<>;$o=y/o//;$N=y/ox//;$o-=/o/*print$o*100/$N--,$/for/./g