my $guess = Math::BigFloat->new( $num**(1/$root));