|
|
@ -103,12 +103,12 @@ sub action |
|
|
|
my $sizeConsistency = "<strong>ANOMALOUS</strong>"; |
|
|
|
my $sizeConsistency = "<strong>ANOMALOUS</strong>"; |
|
|
|
|
|
|
|
|
|
|
|
# TOO BIG ? If the size is 6 times higher than usual : |
|
|
|
# TOO BIG ? If the size is 6 times higher than usual : |
|
|
|
if ( $new_size > ($new_size_q3 + $new_size_q3 - $new_size_q1) * 1.5 or $new_size > $new_size_avg * 6 ) { |
|
|
|
if ( $new_size > ($new_size_q3 + $new_size_q3 - $new_size_q1) * 1.5 and $new_size > $new_size_avg * 6 ) { |
|
|
|
$toobig = 1; |
|
|
|
$toobig = 1; |
|
|
|
} |
|
|
|
} |
|
|
|
|
|
|
|
|
|
|
|
# TOO SMALL ? If the size is 3 times lower than usual : |
|
|
|
# TOO SMALL ? If the size is 3 times lower than usual : |
|
|
|
if ( $new_size < ($new_size_q1 - $new_size_q3 - $new_size_q1) * 1.5 or $new_size < $new_size_avg / 3 ) { |
|
|
|
if ( $new_size < ($new_size_q1 - $new_size_q3 - $new_size_q1) * 1.5 and $new_size < $new_size_avg / 3 ) { |
|
|
|
$toosmall = 1; |
|
|
|
$toosmall = 1; |
|
|
|
} |
|
|
|
} |
|
|
|
|
|
|
|
|
|
|
|