|
|
@ -169,4 +169,26 @@ print("new_size_q1 : $json->{new_size_q1}"); |
|
|
|
print("\n"); |
|
|
|
print("\n"); |
|
|
|
print("full_size : $json->{full_size}"); |
|
|
|
print("full_size : $json->{full_size}"); |
|
|
|
print("\n----------------\n"); |
|
|
|
print("\n----------------\n"); |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
print("\n----------------\n"); |
|
|
|
|
|
|
|
# TOO SMALL ? |
|
|
|
|
|
|
|
my $toosmall = "false"; |
|
|
|
|
|
|
|
# $json->{new_size} > $json->{new_size_q3} + $json->{new_size_q3} - $json->{new_size_q1}) * 1.5 |
|
|
|
|
|
|
|
# AND |
|
|
|
|
|
|
|
# $json->{new_size} > $json->{new_size_avg} * 6 |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
# TOO BIG ? |
|
|
|
|
|
|
|
my $toobig = "false"; |
|
|
|
|
|
|
|
# $json->{new_size} < $json->{new_size_q1} - $json->{new_size_q3} - $json->{new_size_q1}) * 1.5 |
|
|
|
|
|
|
|
# AND |
|
|
|
|
|
|
|
# $json->{new_size} < $json->{new_size_avg} / 3 |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
print("Size Consistency : "); |
|
|
|
|
|
|
|
if ( $toosmall == "false" AND $toobig == "false" ) { |
|
|
|
|
|
|
|
print("Normal"); |
|
|
|
|
|
|
|
} |
|
|
|
|
|
|
|
else { |
|
|
|
|
|
|
|
print("ANOMALOUS"); |
|
|
|
|
|
|
|
} |
|
|
|
|
|
|
|
print("\n----------------\n"); |
|
|
|
exit(0); |
|
|
|
exit(0); |
|
|
|