sub adjust_data {
my ($data) = @_;
- if($data > ($giga)) { $data = int($data / $giga); $data = "$data"."Gb"; }
+ if($data > ($giga)) { $data = $data / $giga; $data = sprintf("%2.2fGb",$data); }
elsif($data > ($mega)) { $data = int($data / $mega); $data = "$data"."Mb"; }
elsif($data > ($kilo)) { $data = int($data / $kilo); $data = "$data"."Kb"; }
return $data;