Help for this page

Select Code to Download


  1. or download this
    $_=pop;$l^$_?$l=$_:die"$_\n"while$_=($_+$ARGV[0]/$_)/2
  2. or download this
    $_=pop;$l^$_?$l=$_:die"$_\n"while($_+=$ARGV[0]/$_)/=2
  3. or download this
    $_=pop;$l^$_?$l=$_:die$_,$/while($_+=$ARGV[0]/$_)/=2