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

##</code><code>##

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