Passing Sessions with Curses::UI::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
[email protected]