Provided by: libnet-rendezvous-publish-perl_0.04-4_all
NAME
Net::Rendezvous::Publish - publish Rendezvous services
SYNOPSIS
use Net::Rendezvous::Publish; my $publisher = Net::Rendezvous::Publish->new or die "couldn't make a Responder object"; my $service = $publisher->publish( name => "My HTTP Server", type => '_http._tcp', port => 12345, ); while (1) { $publisher->step( 0.01 ) }
DESCRIPTION
METHODS
new Creates a new publisher handle publish( %definition ) Returns a Net::Rendezvous::Publish::Service object. The following keys are meaningful in the service definition hash. name A descriptive name for the service. type The type of service. This is string of the form _service._protocol. port The port on which you're advertising the service. If you're not using a port (and instead just using mDNS as a way of propogating other service information) it's common practice to use 9 (the discard service) domain The domain in which to advertise a service. Defaults to "local." step( $seconds ) Spend at most $seconds seconds handling network events and updating internal state.
TODO
At some point I may learn enough of the mDNS protocol to write a pure-perl responder. That'll be nifty.
AUTHOR
Richard Clamp <richardc@unixbeard.net>
COPYRIGHT
Copyright 2004, 2005, 2006, Richard Clamp. All Rights Reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
SEE ALSO
Net::Rendezous - for service browsing. Net::Rendezvous::Publish::Backend::* - you'll need one of these to talk to your local mDNS responder.