|
|
@ -40,9 +40,6 @@ if ( $host ) { |
|
|
|
new_size_q3 => 0 |
|
|
|
new_size_q3 => 0 |
|
|
|
}; |
|
|
|
}; |
|
|
|
|
|
|
|
|
|
|
|
my $lastXferErrors = 0; |
|
|
|
|
|
|
|
my $maxErrors = 0; |
|
|
|
|
|
|
|
my $new_size_of_last_full = 0; |
|
|
|
|
|
|
|
my @bpc_info = $bpc->BackupInfoRead($host); |
|
|
|
my @bpc_info = $bpc->BackupInfoRead($host); |
|
|
|
my $sizes = new Statistics::Descriptive::Full; |
|
|
|
my $sizes = new Statistics::Descriptive::Full; |
|
|
|
|
|
|
|
|
|
|
@ -67,7 +64,6 @@ if ( $host ) { |
|
|
|
$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}; |
|
|
|
$json->{last_age} = sprintf("%.1f", ($json->{age}) / 84600); |
|
|
|
$json->{last_age} = sprintf("%.1f", ($json->{age}) / 84600); |
|
|
|
$json->{max_errors} = $conf->{MaxXferError} || 0; |
|
|
|
|
|
|
|
} |
|
|
|
} |
|
|
|
} |
|
|
|
} |
|
|
|
|
|
|
|
|
|
|
|