NAME
    POE::Component::IRC::Plugin::WWW::KrispyKreme::HotLight - IRC Plugin to
    announce when there are fresh donuts in the area!

SYNOPSIS
      use POE::Component::IRC::Plugin::WWW::KrispyKreme::HotLight;

      use strict;
      use warnings;

      use POE qw(
        Component::IRC
        Component::IRC::Plugin::WWW::KrispyKreme::HotLight
      );

      my $nick    = 'donut_bot';
      my $ircname = 'the donut bot';
      my $server  = 'irc.foobar';

      my @channels = ('#coffee');

      my $irc = POE::Component::IRC->spawn(
          nick    => $nick,
          ircname => $ircname,
          server  => $server
      ) or die "oops... $!";

      POE::Session->create(
          package_states => [main => [qw(_start irc_001)],],
          heap           => {irc  => $irc},
      );

      $poe_kernel->run;

      sub _start {
          my $heap = $_[HEAP];

          my $irc = $heap->{irc};
          $irc->yield(register => 'all');

          $irc->plugin_add(
              Donuts => POE::Component::IRC::Plugin::WWW::KrispyKreme::HotLight->new(    #
                  geo => [34.101509, -118.32691]
              )
          );

          $irc->yield(connect  => {});
          return;
      }

      sub irc_001 {
          $irc->yield(join => $_) for @channels;
          return;
      }

CONSTRUCTOR
      $irc->plugin_add(
          Donuts => POE::Component::IRC::Plugin::WWW::KrispyKreme::HotLight->new(    #
              geo => [34.101509, -118.32691]
          )
      );

    The geo attribute is REQUIRED. See WWW::KrispyKreme::HotLight for more
    info

DESCRIPTION
    POE::Component::IRC::Plugin::WWW::KrispyKreme::HotLight is an IRC plugin
    that announces when there are fresh Krispy Kreme donuts near the given
    location

SEE ALSO
    WWW::KrispyKreme::HotLight

    POE::Component::IRC::Plugin

AUTHOR
    Curtis Brandt <curtis@cpan.org>

COPYRIGHT
    Copyright 2013- Curtis Brandt

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

SEE ALSO