| Sicherung :: Server. Sicherung :: Server ist ein Perl-Sicherungsserver. |
Jetzt downloaden |
Sicherung :: Server. Ranking & Zusammenfassung
- Lizenz:
- Perl Artistic License
- Name des Herausgebers:
- Cal Henderson
- Website des Verlags:
- http://search.cpan.org/~iamcal/
Sicherung :: Server. Stichworte
Sicherung :: Server. Beschreibung
FUSE :: Server ist ein Perl-Sicherungsserver. Sicherung :: Server ist ein Perl-Sicherungsserver.Synopsis Verwenden Sie die Sicherung :: Server; Meine $ s = Sicherung :: server-> neu ({port => 35008, maxclients => 5000, ruhe => 1,}); mein $ status = $ s-> bind (); drucken "Server gestartet: $ status"; $ s-> addcallback ('saveallall', msg_boadcast); $ s-> addcallback ('client_start', msg_client_start); $ s-> defaultcallback (unknown_command); $ SIG {INT} = $ SIG {Term} = $ SIG {HUP} = sub {$ s-> stop ();};}; $ s-> Start (); sub msg_boadcast {MY ($ userid, $ msg, $ params) = @_; meine @a = split ///, $ params; $ s-> sendall ($ A , $ A ); } sub msg_client_start {MY ($ userid, $ msg, $ params) = @_; $ s-> Senden ($ UserID, 'secret_key', '123456789'); } Sub Unknown_Command {MY ($ userid, $ msg, $ params) = @_; drucken "unbekannter Befehl $ msgn"; } Anforderungen: · Perl.
Sicherung :: Server. Zugehörige Software