|
|
@ -113,7 +113,6 @@ sub action |
|
|
|
# Check Size Consistency |
|
|
|
# Check Size Consistency |
|
|
|
my $new_size = 0; |
|
|
|
my $new_size = 0; |
|
|
|
my $new_size_avg = 0; |
|
|
|
my $new_size_avg = 0; |
|
|
|
my $new_size_median = 0; |
|
|
|
|
|
|
|
my $new_size_q1 = 0; |
|
|
|
my $new_size_q1 = 0; |
|
|
|
my $new_size_q3 = 0; |
|
|
|
my $new_size_q3 = 0; |
|
|
|
my $sizes = new Statistics::Descriptive::Full; |
|
|
|
my $sizes = new Statistics::Descriptive::Full; |
|
|
@ -132,7 +131,6 @@ sub action |
|
|
|
|
|
|
|
|
|
|
|
$new_size = $Backups[$i]->{sizeNew}; |
|
|
|
$new_size = $Backups[$i]->{sizeNew}; |
|
|
|
$new_size_avg = int $sizes->mean; |
|
|
|
$new_size_avg = int $sizes->mean; |
|
|
|
$new_size_median = int $sizes->median; |
|
|
|
|
|
|
|
$new_size_q1 = eval { int $sizes->quantile(1) } || 0; |
|
|
|
$new_size_q1 = eval { int $sizes->quantile(1) } || 0; |
|
|
|
$new_size_q3 = eval { int $sizes->quantile(3) } || 0; |
|
|
|
$new_size_q3 = eval { int $sizes->quantile(3) } || 0; |
|
|
|
} |
|
|
|
} |
|
|
|