| Fusible :: servidor FUSE :: Server es un servidor PERL-FUSE. |
Descargar ahora |
Fusible :: servidor Clasificación y resumen
- Licencia:
- Perl Artistic License
- Nombre del editor:
- Cal Henderson
- Sitio web del editor:
- http://search.cpan.org/~iamcal/
Fusible :: servidor Etiquetas
Fusible :: servidor Descripción
FUSE :: Server es un servidor PERL-FUSE. FUSE :: Server es un servidor PERL-FUSE.SYNOPSIS Use FUSE FUSE :: Server; MY $ S = FUSE :: Server-> Nuevo ({PORT => 35008, MAXCLIENTS => 5000, SILLADS => 1,}); My $ status = $ s-> enlace (); Imprimir "El servidor comenzó: $ estado"; $ s-> addcallback ('broadcastall', msg_broadcast); $ s-> addcallback ('client_start', msg_client_start); $ s-> defaultCallback (Unknown_Command); $ SIG {INT} = $ SIG {TERL} = $ SIG {HUP} = SUB {$ S-> Stop ();}; $ s-> inicio (); Sub msg_broadcast {my ($ userid, $ msg, $ params) = @_; mi @a = split ///, $ params; $ s-> Sendall ($ A , $ A ); } Sub msg_client_start {my ($ userid, $ msg, $ params) = @_; $ s-> Enviar ($ UserID, 'Secret_Key', '123456789'); } Subknown_command {my ($ userid, $ msg, $ params) = @_; Imprimir "Comando desconocido $ MSGN"; } Requisitos: · Perl
Fusible :: servidor Software relacionado