J'utilise depuis près de deux ans systématiquement le module POE::Component::Server::TCP, quand je doit faire des serveurs TCP.

Jusque la j'ai toujours employé ce module dans des scripts "libre" je veut dire pas dans un package et c'est justement ce qui m'amène ici je n'arrive pas a lancer ce module si je le met dans un sub

si je met cela dans mon package

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
    my $acceptor_session_id = new POE::Component::Server::TCP (
             Port     => 12000,
             Acceptor => \&_accept_handler,
             Error    => \&_error_handler,
             Concurrency => -1,
    ) or die ('Unable to create TCP server');

pas de problème sa marche mais m'empèche d'appeler la fonction new() de mon package ou n'importe qu'elle autre fonction d'ailleur, vous me direz no problémo fait une fonction bah justement sa marche pas

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
sub server
{
      $acceptor_session_id = new POE::Component::Server::TCP (
             Port     => 12000,
             Acceptor => \&_accept_handler,
             Error    => \&_error_handler,
             Concurrency => -1,
    ) or die ('Unable to create TCP server');
}

le serveur ne ce lance pas pour préçision die() n'est jamais appelé.

Je ne comprend pas ce comportement aussi j'ai besoin de vos lumières

merci