NAME

Jabber::PubSub::JEAI - Perl extension for Erlang's J-EAI server

SYNOPSIS

use Jabber::PubSub::JEAI;

Channel creation:

my $param = {
    'uid'      => 'admin',
    'pwd'      => 'nimda',
    'host'     => 'localhost',
    'port'     => 5222,
    'resource' => 'Test',
    'channel'  => 'home/localhost/admin/sport',
    'to'       => 'pubsub.localhost',
    'iq_id'    => '',
    'payload'  => '',
};
Jabber::PubSub::JEAI::create_channel($param);

Subscription to channel:

$param = {
    'uid'      => 'app2',
    'pwd'      => 'app2',
    'host'     => 'localhost',
    'port'     => 5222,
    'resource' => 'Test',
    'channel'  => 'home/localhost/admin/sport',
    'to'       => 'pubsub.localhost',
    'iq_id'    => '',
    'payload'  => '',
};
Jabber::PubSub::JEAI::subscribe($param);

Listen:

$param = {
    'uid'      => 'app2',
    'pwd'      => 'app2',
    'host'     => 'localhost',
    'port'     => 5222,
    'resoirce' => 'Test',
    'channel'  => '',
    'to'       => '',
    'iq_id'    => '',
    'payload'  => '',
};
Jabber::JEAI::listen($param);

Publication to channel:

$param = {
    'uid'      => 'admin',
    'pwd'      => 'nimda',
    'host'     => 'localhost',
    'port'     => 5222,
    'resource' => 'Test',
    'channel'  => 'home/localhost/admin/sport',
    'to'       => 'pubsub.localhost',
    'iq_id'    => '',
    'payload'  => 'Breaking news! ...',
};
Jabber::PubSub::JEAI::publish($param);	

DESCRIPTION

This package offers some utilities for interfacing with Erlang's J-EAI server 1.0.

EXPORT

None by default.

SEE ALSO

none

AUTHOR

Kai Li, <kaili@cpan.org>

COPYRIGHT AND LICENSE

Copyright (C) 2005 by Kai Li

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.3 or, at your option, any later version of Perl 5 you may have available.