generic-poky/meta/lib/oeqa/runtime/files/test.pl

$a = 9.01e+21 - 9.01e+21 + 0.01;
print ("the value of a is ", $a, "\n");