use POE qw(Session);

POE::Session->create( 'inline_states' =>
       { '_start' => \&test }, 'args' => [ "hi" ],
);


sub test {
    print "hier mal das 'hi' ausgeben";
}

POE::Kernel->run();