say("o"x ++$_/10~"-"x $_%10)xx 99;say "x"