$_=pop;$l^$_?$l=$_:die$_,$/while($_+=$ARGV[0]/$_)/=2