I seemed to have no problem at all running the perl script. I ran the script under Active Perl 5.8.0 on Windows with version 1.38 of Math::Bigfloat, which produced the following output:

sqrt(0.96303) = 0.981340919354737
value = $VAR1 = bless( {
                 '_m' => bless( {
                                  'value' => [
                                               9999
                                             ],
                                  '_a' => undef,
                                  '_f' => 1,
                                  '_p' => undef,
                                  'sign' => '+'
                                }, 'Math::BigInt' ),
                 '_e' => bless( {
                                  'value' => [
                                               4
                                             ],
                                  '_a' => undef,
                                  '_f' => 1,
                                  '_p' => undef,
                                  'sign' => '-'
                                }, 'Math::BigInt' ),
                 'sign' => '+'
               }, 'Math::BigFloat' );
Stringified BigFloat sqrt(0.9999) = 0.999949998749938
BigFloat sqrt(0.9999) = 0.9999499987499374960934765419905760409437
[download]