$s+=6/$_**2for 1..1000000;print sqrt$s