From a60c6ac88208c11eee3de4addfc32f2bea3598ad Mon Sep 17 00:00:00 2001
From: Joe Rayhawk <jrayhawk@omgwallhack.org>
Date: Wed, 21 Oct 2015 17:25:23 -0700
Subject: irssi-jtv.pl: new

---
 irssi-jtv.pl | 29 +++++++++++++++++++++++++++++
 1 file changed, 29 insertions(+)
 create mode 100644 irssi-jtv.pl

(limited to 'irssi-jtv.pl')

diff --git a/irssi-jtv.pl b/irssi-jtv.pl
new file mode 100644
index 0000000..e9e72f5
--- /dev/null
+++ b/irssi-jtv.pl
@@ -0,0 +1,29 @@
+use Irssi 0.8.10 ();
+use strict;
+
+use vars qw($VERSION %IRSSI);
+
+$VERSION="0.1.7";
+%IRSSI = (
+        authors=> 'jrayhawk',
+        name=> 'jtv',
+        description=> 'repeats JTV information',
+        license=> 'GPL v2',
+);
+
+sub jtv_say {
+        my ($server, $msg, $nick, $address) = @_;
+
+        return if ($nick ne 'jtv');
+
+        return if ($msg !~ /(.+) is now hosting you for (.+) viewers\./ );
+
+        open(FILE, "~/.config/twitch/channel");
+        my $channel = <FILE>;
+        $channel = chomp($channel);
+        close(FILE);
+
+        $server->command("msg $channel Welcome, $2 viewers! Thanks for the host, $1!");
+}
+
+Irssi::signal_add_last('message private', 'jtv_say');
-- 
cgit v1.2.3