Passing Sessions with Curses::UI::POE

[poe]

Using Curses::UI::POE and the key binding function set_binding(), I've been
using a global session variable to trigger events in POE:
    use POE;
    use Curses::UI::POE;

    my $SESSION;

    my $CUI = Curses::UI::POE->new(
      inline_states  => {
        _start => sub { $SESSION = $_[SESSION]; },
        blah   => sub { # ...
        },
    });

    $CUI->set_binding( sub { exit 0; },   "q");
    $CUI->set_binding( sub {
        $poe_kernel->post( $SESSION, "blah" );
    }, "b");

    $CUI->mainloop;

Is there a better way to post events to the Curses::UI::POE session 
created earlier when the user presses a particular key?

-- Mike

Mike Schilli
p...@perlmeister.com