POE::Session->create ( inline_states => { _start => \&startApplication, searchmode => \&searchMode, } ); POE::Session->create ( inline_states => { _start => \&searchUpdate, } ); $poe_kernel->run(); # Relevant is also: sub startApplication { $poe_main_window->Toplevel(-title => "Search"); .... jadajadajada .... } sub searchUpdate { while(1) { next if (!$INTERESTING); ! DO ALOT ! } }