Select Code to Download

my @strings_to_match = ('192.168.200.', '10.10.200');
my ($regex) = map { qr/$_/ }
...
    push @filtered_result, $_
        if m{ ,SEVERE, .* $regex }x;
}