mata_bot

commit 3bebabfb747e2a236bae7c7c246d06aaaf63cd94
parent 46ca98d72e0fc81ffc29c72899ccad7957cb7589
Author: boredpasta <boredpasta@tutanota.com>
Date:   Sun, 16 Mar 2025 18:36:08 +0200

add a s/// command

Diffstat:
M
mata_bot.pl
 | 
12
++++++++++++

1 file changed, 12 insertions(+), 0 deletions(-)
diff --git a/mata_bot.pl b/mata_bot.pl
@@ -17,6 +17,7 @@ my $host = 'irc.libera.chat';
 my $logging = 0;
 my $port = '6697';
 my $tls = 1;
+my %subbuffer;
 
 sub logger {
 	my $logmessage = shift;
@@ -53,7 +54,18 @@ sub respond {
 		} else {
 			msg($sock, "${sender_nick}: Bleep Bloop? <[._.]>");
 		}
+	} elsif ($subbuffer{$sender_nick} && $message =~ m,s/([^\000\r\n/]*)/([^\000\r\n/]*)/?,) {
+		# chat s///
+		my $toreplace = $1;
+		my $replacement = $2;
+		if ($subbuffer{$sender_nick} =~ s/$toreplace/$replacement/) {
+			msg($sock, "${sender_nick} meant to say: $subbuffer{$sender_nick}");
+		} else {
+			msg($sock, "${sender_nick} meant to say something but idk lol ($toreplace doesn't exist in their last message)");
+		}
+		return;
 	}
+	$subbuffer{$sender_nick} = $message;
 }
 
 # process args