FUSE::Server

FUSE::Server is a Perl-FUSE server.
Download

FUSE::Server Ranking & Summary

Advertisement

  • Rating:
  • License:
  • Perl Artistic License
  • Price:
  • FREE
  • Publisher Name:
  • Cal Henderson
  • Publisher web site:
  • http://search.cpan.org/~iamcal/

FUSE::Server Tags


FUSE::Server Description

FUSE::Server is a Perl-FUSE server. FUSE::Server is a Perl-FUSE server.SYNOPSIS use FUSE::Server; my $s = FUSE::Server->new({ Port=>35008, MaxClients=>5000, Quiet=>1, }); my $status = $s->bind(); print "Server started: $status"; $s->addCallback('BROADCASTALL',&msg_broadcast); $s->addCallback('client_start',&msg_client_start); $s->defaultCallback(&unknown_command); $SIG{INT} = $SIG{TERM} = $SIG{HUP} = sub{$s->stop();}; $s->start(); sub msg_broadcast{ my ($userid,$msg,$params) = @_; my @a = split ///,$params; $s->sendAll($a,$a); } sub msg_client_start{ my ($userid,$msg,$params) = @_; $s->send($userid,'SECRET_KEY','123 456 789'); } sub unknown_command{ my ($userid,$msg,$params) = @_; print "Unknown command $msgn"; } Requirements: · Perl


FUSE::Server Related Software

About SoftwareSea