$x = 1.000000001; say abs($x**1e8);;
1.10517092716461

$x = 1.000000001; say abs($x**(1e8+1));;
1.10517092826979