Debug

1 files changed, 16 insertions, 0 deletions

diff --git a/lib/IRC/Client/Plugin/Debugger.pm6 b/lib/IRC/Client/Plugin/Debugger.pm6
new file mode 100644
index 0000000..20a2283
--- /dev/null
+++ b/lib/IRC/Client/Plugin/Debugger.pm6
@@ -0,0 +1,16 @@
+use v6;
+use IRC::Client;
+use IRC::Client::Plugin;
+unit class IRC::Client::Plugin::Debugger:ver<1.001001> does IRC::Client::Plugin;
+
+multi method msg () { True }
+multi method msg ($irc, $msg) {
+    $msg.say;
+}
+
+multi method interval (                ) {  6  }
+multi method interval (IRC::Client $irc) {
+    $irc.privmsg(
+        $irc.channels[0], "5 seconds passed. Time is now " ~ now
+    );
+}