my $missing = "MISSING";
my %h = (
    A   => 1.23435
);
my $out = sprintf "%.3E", $h{A} || $missing;
warn $out;
$out = sprintf "%.3E", $h{B} || $missing;
warn $out;