adminsys/vivivi
adminsys/vivivi
9
0
Fork 0
Code Issues Pull Requests Releases Activity

Fix regexp

Browse Source
This commit is contained in:
root 2016-09-21 14:49:40 +02:00
parent 2b07935655
commit abd898f025
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
galanga/nagios-irc-bot.pl
View File

@ -153,6 +153,9 @@ sub on_public {
# FIXME: the logging gets spammy ... do we actually want to log to stdout? # FIXME: the logging gets spammy ... do we actually want to log to stdout?
print "<$nick> $arg\n"; print "<$nick> $arg\n";
$mynick =~ s/\[/\\[/g;
$mynick =~ s/\]/\\]/g;
if ($arg =~ /^$mynick[,: ]/i || $arg =~ /^!/ ) { if ($arg =~ /^$mynick[,: ]/i || $arg =~ /^!/ ) {
if ($arg =~ /^(?:$mynick[,: ]|!)\s*ignore (.+)\s*$/i) { if ($arg =~ /^(?:$mynick[,: ]|!)\s*ignore (.+)\s*$/i) {
$ignore{$1} = 1; $ignore{$1} = 1;
@ -235,7 +238,7 @@ sub on_public {
{ {
$self->privmsg([ @to ], "$nick: d'accord je la ferme :-("); $self->privmsg([ @to ], "$nick: d'accord je la ferme :-(");
$::tagueule = 1; $::tagueule = 1;
$self->nick('vivivi{zzz}'); $self->nick('vivivi[zzz]');
} }
else { else {
$self->privmsg([ @to ], "$nick: je reviens et je ne suis pas content !"); $self->privmsg([ @to ], "$nick: je reviens et je ne suis pas content !");
@ -507,6 +510,6 @@ sub adjust_nick
$count += $_; $count += $_;
} }
close CMDPIPE; close CMDPIPE;
$conn->nick(sprintf('vivivi{%s}', $count)) if ( $count > 0 ); $conn->nick(sprintf('vivivi[%s]', $count)) if ( $count > 0 );
} }