Saturation Marker Report

Compute a saturation percentage from used and capacity values and classify the fill level.

saturation_marker.pl

use strict;
use warnings;

my $used = ;
my $capacity = 100;
my $percent = int($used * 100 / $capacity);
my $sat_status = "clear";

if ($percent >= 90) {
    $sat_status = "saturated";
} elsif ($percent >= 70) {
    $sat_status = "warm";
}

print "used=$used percent=$percent status=$sat_status\n";

use strict;
use warnings;

my $used = ;
my $capacity = 100;
my $percent = int($used * 100 / $capacity);
my $sat_status = "clear";

if ($percent >= 90) {
    $sat_status = "saturated";
} elsif ($percent >= 70) {
    $sat_status = "warm";
}

print "used=$used percent=$percent status=$sat_status\n";

use strict;
use warnings;

my $used = ;
my $capacity = 100;
my $percent = int($used * 100 / $capacity);
my $sat_status = "clear";

if ($percent >= 90) {
    $sat_status = "saturated";
} elsif ($percent >= 70) {
    $sat_status = "warm";
}

print "used=$used percent=$percent status=$sat_status\n";

saturation marker A saturation marker converts raw usage into a percentage label that signals capacity pressure.