$n+=<>;@q=1;$|--?$v=$_:$_>$n|@$_||push@q,$#$_=++$v,$_+($==grep$'&1<<$_,//..64),$v,$_-$=for@q;print$#$n