如何使用sprintf控制Perl中的浮点格式？

Question

我通常使用%g ，但似乎指数位的数量是系统相关的 ，我不能像%.4g或%.2g这样的变体工作（它们只产生相同的结果，不是吗？）。

我真正想做的是如果数字（绝对值）在某个范围内（例如10 ^ 5> | x |> 10 ^ -5），则使用简单的浮点表示“如果可能”，否则使用科学计数法。 我也想限制显示的位数，比如5（所以我不会得到超大的浮点数，如0.12345678901234567890 ......）。

一些例子：

0.123456890 - > 0.12346

0.000000000123456 - > 1.23456e-10

我可以直接在sprintf执行此操作，还是必须编写特殊的包装器？

Answer 1

不，你必须编写一个自定义包装器来获得你描述的行为：正如perlfunc所说：

对于“g”和“G”，[精度]指定要显示的最大位数，包括小数点之前和之后的位数;

请注意，简单浮点表示中的前导零不计为“数字”。

CPAN上有一些模块可以帮助你编写类似sprintf的函数。 String :: sprintf用于向常规sprintf格式添加一个或两个自定义格式。 String :: Formatter用于从头开始，其函数看起来像sprintf但不从它继承任何格式。