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