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选项，但我没有看到设置精度的选项。