|
|
@ -63,7 +63,6 @@ if ( $host ) { |
|
|
|
$json->{new_size} = $bpc_info[$i]->{sizeNew}; |
|
|
|
$json->{new_size} = $bpc_info[$i]->{sizeNew}; |
|
|
|
$json->{new_size_avg} = int $sizes->mean; |
|
|
|
$json->{new_size_avg} = int $sizes->mean; |
|
|
|
$json->{new_size_median} = int $sizes->median; |
|
|
|
$json->{new_size_median} = int $sizes->median; |
|
|
|
# Some old versions of Statistics::Descriptive (eg, on el5) do not support quantile |
|
|
|
|
|
|
|
$json->{new_size_q1} = eval { int $sizes->quantile(1) } || 0; |
|
|
|
$json->{new_size_q1} = eval { int $sizes->quantile(1) } || 0; |
|
|
|
$json->{new_size_q3} = eval { int $sizes->quantile(3) } || 0; |
|
|
|
$json->{new_size_q3} = eval { int $sizes->quantile(3) } || 0; |
|
|
|
$json->{age} = time - $bpc_info[$i]->{startTime}; |
|
|
|
$json->{age} = time - $bpc_info[$i]->{startTime}; |
|
|
|