Warning: file_get_contents(/data/phpspider/zhask/data//catemap/8/perl/9.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Perl Number::Bytes::Human_Perl - Fatal编程技术网

Perl Number::Bytes::Human

Perl Number::Bytes::Human,perl,Perl,我正在使用这段代码将字节转换为更可读的格式,例如155K、1.5M、1.5G,但无法从CPAN的解释中理解转换后的值如何打印到小数点后的第二位并进行舍入。 谢谢 我能够使用以下方法控制小数位数: 确实有一个round选项,但我没有看到设置精度的选项。这个特定模块是alpha,可能值得考虑。use Number::Format实际上更适合我的需要。非常有用。非常感谢。 use strict; use warnings; use Number::Bytes::Human qw(format_byt

我正在使用这段代码将字节转换为更可读的格式,例如155K、1.5M、1.5G,但无法从CPAN的解释中理解转换后的值如何打印到小数点后的第二位并进行舍入。 谢谢


我能够使用以下方法控制小数位数:


确实有一个
round
选项,但我没有看到设置精度的选项。

这个特定模块是alpha,可能值得考虑。use Number::Format实际上更适合我的需要。非常有用。非常感谢。
use strict; 
use warnings;
use Number::Bytes::Human qw(format_bytes);

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