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