http://www.perlmonks.org?node_id=913792


in reply to Multiple if-else statements using C-style ternary operator

This should be enough:
print $status == 2 ? "HIGH "
    : $status == 1 ? "MODERATE "
    : "LOW ";

[download]

In Section Seekers of Perl Wisdom