DB<1> use Number::Format; DB<2> print Number::Format::format_number(-0.00004,5) 4e-05 [download]
In reply to Sign bug in Number::Format by Anonymous Monk