Volity::Jabber 0.6.5 review
DownloadVolity::Jabber is a base class for Jabber-speaking Volity objects. SYNOPSIS package My::Volity::Object; use base qw(Volity::
|
|
Volity::Jabber is a base class for Jabber-speaking Volity objects.
SYNOPSIS
package My::Volity::Object;
use base qw(Volity::Jabber);
use fields qw(wubba_wubba);
# Override the parent's initialize method to set values on construction.
sub initialize {
my $self = shift;
$self->SUPER::initialize(@_); # Don't forget to call the parent's init!
# Initialization goes here
$self->wubba_wubba('grink gronk');
}
# An example chat handler, defined by the base class
sub handle_groupchat_message {
my $self = shift;
my ($message) = @_; # A hashref with info about the incoming message.
# Send a debug message.
$self->logger->debug(sprintf("%s says, '%s'n", $$message{from}, $$message{body}));
# More use message-handling code goes here.
}
This package provides a base class for Volity objects that speak Jabber. These objects will automatically connect to (and authenticate with ) a Jabber server on construction, and then provide some methods for doing some common jabbery things, as well as access the POE kernel.
Requirements:
Perl
Volity::Jabber 0.6.5 keywords