$_=<>; @l=/\^\*/g; @r=/\*\^/g; print 0+@l,$",0+@r