my $k_size = sprintf "%.0fK", $size / 1024; #### my $k_size = sprintf "%dK", ($size + 1023) / 1024;