Chris Williams > POE-Component-IRC-Plugin-Bollocks-1.00 > POE::Component::IRC::Plugin::Bollocks

Download:
POE-Component-IRC-Plugin-Bollocks-1.00.tar.gz

Dependencies

Annotate this POD

View/Report Bugs
Module Version: 1.00   Source  

NAME ^

POE::Component::IRC::Plugin::Bollocks - A POE::Component::IRC plugin that talks bollocks.

SYNOPSIS ^

  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;
  }

DESCRIPTION ^

POE::Component::IRC::Plugin::Bollocks is a POE::Component::IRC plugin generates management bullshit whenever you need it.

CONSTRUCTOR ^

new

Creates a new plugin object.

IRC INPUT ^

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.

AUTHOR ^

Chris BinGOs Williams <chris@bingosnet.co.uk>

LICENSE ^

Copyright © Chris Williams.

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

SEE ALSO ^

POE::Component::IRC

Dev::Bollocks

syntax highlighting: