<>=~s#\(#$_=$';$%+=/\^.*?\^.*?\*/&&$'=~y/)//;$-+=/\*.*?\^.*?\^/&&$'=~y/)//#ger;print"$% $-"