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.