mata_bot

some cheeky bot for #unix_surrealism
git clone https://git.pastanoggin.com/mata_bot.git
Log | Files | Refs | README | LICENSE

commit 9182b34d48f64b05205ec771911c24bcdf4c460a
parent 23fce65c5b46033fb91bcba9a57a96403b03078c
Author: boredpasta <boredpasta@tutanota.com>
Date:   Tue, 18 Mar 2025 12:19:25 +0200

reorder nick mentions to the bottom so they don't interfere with other commands

Diffstat:
Mmata_bot.pl | 30+++++++++++++++---------------
1 file changed, 15 insertions(+), 15 deletions(-)

diff --git a/mata_bot.pl b/mata_bot.pl @@ -42,21 +42,7 @@ sub msg { sub respond { my ($sock, $sender_nick, $message) = @_; # if no triggers found, check for mentions - if ($message =~ /^${NICK}(:|,)? *[^\000\r\n\ ]+/) { - # we got a command - if ($sender_nick =~ /^${MOTHER}$/) { - msg($sock, "Done, mother! <[^_^]>"); - } else { - msg($sock, "${sender_nick}: BSOD!! <[x~x]>"); - } - } elsif ($message =~ /${NICK}/) { - # we got mentioned - if ($sender_nick =~ /^${MOTHER}$/) { - msg($sock, "Yes, mother? <[^_^]>"); - } else { - msg($sock, "${sender_nick}: Bleep Bloop? <[._.]>"); - } - } elsif ($subbuffer{$sender_nick} && $message =~ m,\b{wb}s/([^\000\r\n/]*)/([^\000\r\n/]*)/?,) { + if ($subbuffer{$sender_nick} && $message =~ m,\b{wb}s/([^\000\r\n/]*)/([^\000\r\n/]*)/?,) { # chat s/// my $toreplace = $1; my $replacement = $2; @@ -122,6 +108,20 @@ sub respond { } else { msg($sock, "failed to get title of link $url <[x~x]> (no title found!)"); } + } elsif ($message =~ /^${NICK}(:|,)? *[^\000\r\n\ ]+/) { + # we got a command + if ($sender_nick =~ /^${MOTHER}$/) { + msg($sock, "Done, mother! <[^_^]>"); + } else { + msg($sock, "${sender_nick}: BSOD!! <[x~x]>"); + } + } elsif ($message =~ /${NICK}/) { + # we got mentioned + if ($sender_nick =~ /^${MOTHER}$/) { + msg($sock, "Yes, mother? <[^_^]>"); + } else { + msg($sock, "${sender_nick}: Bleep Bloop? <[._.]>"); + } } return 0; }