http://www.perlmonks.org?node_id=166239


in reply to computing square root by hand -- no sqrt (golf, beginner)

44 using both arguments, but no \n. Add 3 for -l to get it.
0 1 2 3 4 12345678901234567890123456789012345678901234 $b=pop;$b=($b+$ARGV[0]/$b)/2for 0..9;print$b

Pepik