POE::Component::IRC::Plugin::Bollocks - A POE::Component::IRC plugin that talks bollocks.
use strict; use warnings; use POE qw(Component::IRC Component::IRC::Plugin::Bollocks); my $nickname = 'Pointy' . $$; my $ircname = 'Pointy Haired Boss'; my $ircserver = 'irc.blah.org'; my $port = 6667; my $channel = '#IRC.pm'; my $irc = POE::Component::IRC->spawn( nick => $nickname, server => $ircserver, port => $port, ircname => $ircname, debug => 0, plugin_debug => 1, options => { trace => 0 }, ) or die "Oh noooo! $!"; POE::Session->create( package_states => [ 'main' => [ qw(_start irc_001) ], ], ); $poe_kernel->run(); exit 0; sub _start { # Create and load our CTCP plugin $irc->plugin_add( 'Bollocks' => POE::Component::IRC::Plugin::Bollocks->new() ); $irc->yield( register => 'all' ); $irc->yield( connect => { } ); undef; } sub irc_001 { $irc->yield( join => $channel ); undef; }
POE::Component::IRC::Plugin::Bollocks is a POE::Component::IRC plugin generates management bullshit whenever you need it.
new
Creates a new plugin object.
BOLLOCKS
If your bot is addressed by name with the command 'BOLLOCKS' (case doesn't matter), it will write some random management bollocks to the channel.
Chris BinGOs Williams <chris@bingosnet.co.uk>
BinGOs
Copyright © Chris Williams.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
POE::Component::IRC
Dev::Bollocks
To install POE::Component::IRC::Plugin::Bollocks, copy and paste the appropriate command in to your terminal.
cpanm
cpanm POE::Component::IRC::Plugin::Bollocks
CPAN shell
perl -MCPAN -e shell install POE::Component::IRC::Plugin::Bollocks
For more information on module installation, please visit the detailed CPAN module installation guide.