Net::BEEP::LitePerl framework for BEEP (RFC 3080, 3081) | |
Download |
Net::BEEP::Lite Ranking & Summary
Advertisement
- License:
- LGPL
- Price:
- FREE
- Publisher Name:
- David Blacka
- Publisher web site:
- http://search.cpan.org/~dblacka/
Net::BEEP::Lite Tags
Net::BEEP::Lite Description
Perl framework for BEEP (RFC 3080, 3081) Net::BEEP::Lite is a "lightweight" implementation of a BEEP server/client framework, born out of a desire to have the ability to simple BEEP client and server work without attempting to be the last word on BEEP in Perl.One thing this package does is intentionally fuse the BEEP Listener role with the Server role, and the Initiatior role with the Client role. That is, it makes no attempt to support the peer-to-peer capabilities of BEEP.Also, it has only rudimentary support for multiple channels, especially on the server side. In particular, by avoiding the use of threads (or some other complicated forking scheme) it does not handle asynchronous channels. Ultimately, on the server side, messages on different channels are processed serially. This eliminates one of the main purposes of using multiple channels. In fact, the system defaults not allowing clients to open more than one channel at a time.That being said, it is possible to support multiple channels, but this package is easiest to use when using only one.SYNOPSIS use Net::BEEP::Lite qw(beep_connect); use Net::BEEP::Lite::ClientSession; my $session = beep_connect(Host => localhost, Port => 10288); my $channel_num = $session->start_channel (URI => 'http://xml.resources.org/profiles/NULL/ECHO'); my $resp_msg = $session->send_and_recv_message (Content => "some content", ContentType => 'text/plain'); print "received response: ", $resp_msg->content(), "\n"; --- use Net::BEEP::Lite::ServerSession; my $profile = Net::BEEP::Lite::BaseProfile->new beep_listen( Port => 12345, Address => 127.0.0.1, Profiles => , Method => 'fork' ); Requirements: · Perl · XML::LibXML
Net::BEEP::Lite Related Software