NAME

Net::Async::XMPP - asynchronous XMPP client based on Protocol::XMPP and IO::Async::Protocol::Stream.

VERSION

version 0.002

SYNOPSIS

            

              
              
use IO::Async::Loop;
use Net::Async::XMPP;
my $loop = IO::Async::Loop->new;
my $client = Net::Async::XMPP::Client->new(
on_message              => sub {
        my ($client, $msg) = @_;
        warn "Message from " . $msg->from . " subject " . $msg->subject . " body " . $msg->body;
        $msg->reply(
                body => 'Message received: ' . $msg->body
        );
},
on_contact_request      => sub {
        my ($client, $contact) = @_;
        warn "Contact request from " . $contact->jid;
},
on_presence             => sub {
        my ($client, $contact) = @_;
        warn "Had a presence update from " . $contact->jid;
},
);
$loop->add($client);
$client->login(
jid     => 'user@example.com',
password => $ENV{NET_ASYNC_XMPP_PASSWORD},
);
$loop->run;
            
          

DESCRIPTION

See the Net::Async::XMPP::Client or Net::Async::XMPP::Server subclasses for more details.

AUTHOR

Tom Molesworth <cpan@entitymodel.com>

CONTRIBUTORS

With thanks to the following for contribution:

• Arthur Axel "fREW" Schmidt for testing, documentation, pointing out some of my mistakes, that sort of thing

• Paul "LeoNerd" Evans for adding Futures to IO::Async (and writing both in the first place)

• Matt Trout for testing early versions

LICENSE

Copyright Tom Molesworth 2010-2014. Licensed under the same terms as Perl itself.