my @status_text = qw(LOW MODERATE HIGH);
my $status = 2;
print $status_text[$status];