|
|
@ -104,8 +104,6 @@ sub action |
|
|
|
# Using a mathematical formula to calculate the consistency of the average size, for new files, on all backups |
|
|
|
# Using a mathematical formula to calculate the consistency of the average size, for new files, on all backups |
|
|
|
my $toobig = 0; |
|
|
|
my $toobig = 0; |
|
|
|
my $toosmall = 0; |
|
|
|
my $toosmall = 0; |
|
|
|
my $sizeConsistencyColor = "Tomato"; |
|
|
|
|
|
|
|
my $sizeConsistency = "<strong>ANOMALOUS</strong>"; |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
# There are enough backup ? |
|
|
|
# There are enough backup ? |
|
|
|
if ( $idBackup < 4 ) { |
|
|
|
if ( $idBackup < 4 ) { |
|
|
@ -127,6 +125,9 @@ sub action |
|
|
|
if ( not $toobig and not $toosmall ) { |
|
|
|
if ( not $toobig and not $toosmall ) { |
|
|
|
$sizeConsistencyColor = "MediumSeaGreen"; |
|
|
|
$sizeConsistencyColor = "MediumSeaGreen"; |
|
|
|
$sizeConsistency = "Normal"; |
|
|
|
$sizeConsistency = "Normal"; |
|
|
|
|
|
|
|
} else { |
|
|
|
|
|
|
|
my $sizeConsistencyColor = "Tomato"; |
|
|
|
|
|
|
|
my $sizeConsistency = "<strong>ANOMALOUS</strong>"; |
|
|
|
} |
|
|
|
} |
|
|
|
} |
|
|
|
} |
|
|
|
|
|
|
|
|
|
|
|