<>;/\(/?${$%--}:$_[$_[$--1]=${++$%}]=$-++for<>=~/./g;print$_+1,$/for@_