> 3e-1 - Num(.3)
5.55111512312578e-17

##</code><code>##

> printf "%.100f\n", .3
0.3000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
> printf "%.100f\n", 3e-1
0.3000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
> printf "%.100f\n", Num(.3)
0.3000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000

##</code><code>##

use Inline::Perl5;
my $p5 = Inline::Perl5.new;
$p5.run('sub p { printf "%.100f\n", shift }');
$p5.call('p', .3);
$p5.call('p', Num(.3));
$p5.call('p', 3e-1);
=finish
0.2999999999999999888977697537484345957636833190917968750000000000000000000000000000000000000000000000
0.2999999999999999888977697537484345957636833190917968750000000000000000000000000000000000000000000000
0.3000000000000000444089209850062616169452667236328125000000000000000000000000000000000000000000000000