2011-06-25 16 views
2

このコードを使用して、バイトをより読みやすい形式に変換しています。 155K、1.5M、1.5Gですが、変換された値が小数点以下2桁目にどのように丸められるかをCPANの説明から把握することはできません。おかげさまで Perl Number :: Bytes :: Human

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

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

この特定のモジュールはアルファです。これは考慮に値するかもしれません。 – TLP

答えて

5

私はNumber::Formatを使用して小数点以下の桁数を制御することができる午前:

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

Number::Bytes::Humanroundオプションを持っているが、私は精度を設定するオプションが表示されません。

+1

Number :: Formatは実際に私のニーズに適しています。非常に役立ちます。どうもありがとう。 – thebourneid