All the Perl that's Practical to Extract and Report
use POE; POE::Session->create( 'inline_states' => { '_start' => sub { print "You know you have too much perl on your mind when you start dreaming in POE object constructs ...\n" } } ); $poe_kernel->run;