$_=<>;$a=y///c;$b=y/o//;$b-=/o/*print$b/--$a,"e2
"for/./g