diff options
| author | root <root@puppet.koumbit.net> | 2012-02-27 17:16:12 -0500 |
|---|---|---|
| committer | Micah Anderson <micah@riseup.net> | 2012-03-14 21:03:26 -0400 |
| commit | 2e732d4a7f7288c2c89f79621391ddf43311028d (patch) | |
| tree | 27d494d69f4cbee398581529dea81b290509f9ee | |
| parent | 967e9dd3a09697afc7a2fb84f193d5c89bf6c1fe (diff) | |
accept dots in services
| -rw-r--r-- | files/irc_bot/riseup-nagios-server.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/files/irc_bot/riseup-nagios-server.pl b/files/irc_bot/riseup-nagios-server.pl index c1a1e0d..faa0eee 100644 --- a/files/irc_bot/riseup-nagios-server.pl +++ b/files/irc_bot/riseup-nagios-server.pl @@ -166,7 +166,7 @@ sub parse_msg { my $event= shift; my $data = join(' ', $event->args); my $msg; - if ($data =~ m/([^:]*:)?\s*ack(?:knowledge)?\s+([a-zA-Z0-9\-\.]+)(?:\s+(\w+)(?:\s+([\w\s]+))?)?/) { + if ($data =~ m/([^:]*:)?\s*ack(?:knowledge)?\s+([a-zA-Z0-9\-\.]+)(?:\s+([\w\.]+)(?:\s+([\w\s]+))?)?/) { #print STDERR "writing to nagios scoket ". $CFG::Nsa{'commandfile'} . "\n"; open(my $cmdfile, ">", $CFG::Nsa{'commandfile'}) || die "Can't open Nagios commandfile: $CFG::Nsa{'commandfile'}!\n"; my $host = $2; |