Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
tree: e94b67c6a0
Fetching contributors…

Cannot retrieve contributors at this time

20 lines (15 sloc) 0.264 kb
#!/usr/bin/env perl
use warnings;
use strict;
use POE;
POE::Session->create(
inline_states => {
_start => \&say_what,
say_what_again => \&say_what,
},
);
POE::Kernel->run();
sub say_what {
print "what\n";
$_[KERNEL]->yield("say_what_again");
}
Jump to Line
Something went wrong with that request. Please try again.