Help for this page
return EVENT $session, "argh" if $condition;
sub EVENT { $kernel->post( shift, event => @_ ); 0; }; # whatever valu +e is appropriate