sub init { my $self = shift; $self->config( { user_sc => 2, } ); POE::Session->create( inline_states => { _start => sub { my ($kernel, $heap) = @_[KERNEL, HEAP]; my $session_id = $_[SESSION] -> ID; $self->config( { user_session_id => $session_id, } ); }, test => sub { }, } ); }