my $error = "DOWN";
my $warn  = "PROBLEM";

# ... and later ...

    if ($line =~ /$error/) {
        # ...
    } elsif ($line =~ /$warn/) {
        # ...
    }