POE::Component::IRC::Plugin::PAUSE::RecentUploads

POE::Component::IRC::Plugin::PAUSE::RecentUploads is a PoCo::IRC plugin for reporting recent uploads to '-/pause.perl.org'
Download

POE::Component::IRC::Plugin::PAUSE::RecentUploads Ranking & Summary

Advertisement

  • Rating:
  • License:
  • Perl Artistic License
  • Price:
  • FREE
  • Publisher Name:
  • Zoffix Znet
  • Publisher web site:
  • http://search.cpan.org/~zoffix/

POE::Component::IRC::Plugin::PAUSE::RecentUploads Tags


POE::Component::IRC::Plugin::PAUSE::RecentUploads Description

POE::Component::IRC::Plugin::PAUSE::RecentUploads is a PoCo::IRC plugin for reporting recent uploads to '-/pause.perl.org' POE::Component::IRC::Plugin::PAUSE::RecentUploads is a PoCo::IRC plugin for reporting recent uploads to "/pause.perl.org" in http::SYNOPSIS use strict; use warnings; use POE::Component::IRC; use POE::Component::IRC::Plugin::PAUSE::RecentUploads; my @Channels = ( '#zofbot', '#other_channel' ); my $irc = POE::Component::IRC->spawn( nick => 'PAUSEBot', server => 'irc.freenode.net', port => 6667, ircname => 'PAUSE recent upload reporter', ) or die "Oh noes :( $!"; POE::Session->create( package_states => , ], ); $poe_kernel->run(); sub _start { $irc->yield( register => 'all' ); # register our plugin $irc->plugin_add( 'PAUSE' => POE::Component::IRC::Plugin::PAUSE::RecentUploads->new( login => 'PAUSE_LOGIN', pass => 'PAUSE_PASS', interval => 600, channels => @Channels, ) ); $irc->yield( connect => { } ); undef; } sub irc_001 { my ( $kernel, $sender ) = @_; $kernel->post( $sender => join => $_ ) for @Channels; undef; } Requirements: · Perl


POE::Component::IRC::Plugin::PAUSE::RecentUploads Related Software