def f(s:String,t:String):Int=1 to'\x0b'indexWhere{i=>val(u,v)=s splitAt s.size-i
v>="1"&&v.toLong<t.toLong&&(u==""||f(u,v)>=0)}
while(0<1)println(f(readLine,"9"*11)+1)
Note that non-ascii characters in the above source code will be escaped (such as \x9f).