Perl Number::Bytes::Human

Question

我正在使用此代码将字节转换为更易读的格式，例如155K, 1.5M, 1.5G，但是从CPAN上的解释看不出转换后的值如何打印到小数点后第二位并四舍五入。谢谢。

use strict; 
use warnings;
use Number::Bytes::Human qw(format_bytes);

my $bytes = format_bytes(-s $file);

Answer 1

我可以使用 Number::Format 控制小数位数:

use Number::Format qw(format_bytes);
print format_bytes(-s $file, precision => 2);

Number::Bytes::Human确实有一个 round 选项，但我没有看到设置精度的选项。