my $value = ($sign ? 1 : -1) * $mantissa * ( 2 ** $exponent);