NAME
MooX::POE - POE::Session combined with Moo (or Moose, if you want)
VERSION
version 0.002
SYNOPSIS
package Counter;
use Moo;
with qw( MooX::POE );
has count => (
is => 'rw',
lazy_build => 1,
default => sub { 1 },
);
sub START {
my ($self) = @_;
$self->yield('increment');
}
sub on_increment {
my ( $self ) = @_;
print "Count is now " . $self->count . "\n";
$self->count( $self->count + 1 );
$self->yield('increment') unless $self->count > 3;
}
Counter->new();
POE::Kernel->run();
DESCRIPTION
This role adds a POE::Session and event handling to the class. Can also be used the same way with Moose.
BASED ON
This plugin is based on code of MooseX::POE.
SUPPORT
IRC
Join #poe on irc.perl.org. Highlight Getty for fast reaction :).
Repository
http://github.com/Getty/p5-moox-poe
Pull request and additional contributors are welcome
Issue Tracker
http://github.com/Getty/p5-moox-poe
AUTHOR
Torsten Raudssus <torsten@raudss.us>
COPYRIGHT AND LICENSE
This software is copyright (c) 2016 by Torsten Raudssus.
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.