$.*=++$i/++$$_ for<>=~/./g;print$.-1