if ($line =~ /DOWN/) {
        # ...
    } elsif ($line =~ /PROBLEM/) {
        # ...
    }