C:\test>perl -E"my $a = 000.76; my $b = 4; my $c = $a * $b; say $c;"
304

##</code><code>##

C:\test>perl -E"my $a = '000.76'; my $b = 4; my $c = $a * $b; say $c;"
3.04