my $k_size = sprintf "%.0fK", $size / 1024;