diff options
Diffstat (limited to 'examples/bot.pl6')
-rw-r--r-- | examples/bot.pl6 | 23 |
1 files changed, 0 insertions, 23 deletions
diff --git a/examples/bot.pl6 b/examples/bot.pl6 deleted file mode 100644 index e991a8e..0000000 --- a/examples/bot.pl6 +++ /dev/null @@ -1,23 +0,0 @@ -use lib 'lib'; -use IRC::Client; - -class MyPlug does IRC::Client::Plugin { - method irc-privmsg-channel ($msg where .text ~~ /^'say' \s+ $<cmd>=(.+)/ ) { - $msg.reply: "How about: $<cmd>.uc()"; - } -} - -my $irc = IRC::Client.new( - :nick('IRCBot') - :debug<2> - :channels<#perl6 #perl7> - # :host<irc.freenode.net> - :port<6667> - # :servers( - # mine => { :port<5667> }, - - # inspircd => { }, - # freenode => { :host<irc.freenode.net> }, - # ) - :plugins(MyPlug.new) -).run; |