use lib ; use IRC::Client; class Messenger does IRC::Client::Plugin { method irc-privmsg-channel ($e) { for $.irc.servers.values -> $server { for $server.channels -> $channel { next if $server eq $e.server and $channel eq $e.channel; $.irc.send: :$server, :where($channel), :text( "$e.nick() over at $e.server.host()/$e.channel() says $e.text()" ); } } $.irc.send: :where :text('I spread the messages!') :server; } } .run with IRC::Client.new: :debug :plugins[Messenger.new] :nick :channels<#zofbot> :servers{ freenode => %( :host, ), local => %( :nick, :channels<#zofbot #perl6>, :host, ) }