Download JOAP::Proxy::Class 0.01

Publisher's description

JOAP::Proxy::Class is a base class for client-side proxies of JOAP classes.

SYNOPSIS

package FooProxy;
use JOAP::Proxy::Package::Class;
use base qw(JOAP::Proxy::Package::Class);

FooProxy->Address('Foo@bar.example.com'); # say what class this is proxying for

package main;

# do Net::Jabber connection stuff here...

$con = get_jabber_connection(); # You work this out

JOAP::Proxy->Connection($con);

# update class attributes with server values

FooProxy->refresh;

# get an attribute value with the automagic accessor

my $height = FooProxy->height;

# set an attribute with the automagic accessor

FooProxy->height($height + 1);

# save class attributes to server

FooProxy->save;

# call a class method, with automagic method thingy

FooProxy->reindex_all_frozzes('upwards');

# get a proxy to a remote instance

my $foo1 = FooProxy->get('Foo@bar.example.com/Number1');

# refresh instance with attribute values from server

$foo1->refresh;

# read an instance attribute using the Magic Accessor

my $name = $foo1->name;

# set an instance attribute (did I mention the magic accessors?)

$foo1->name('Murgatroyd');

# save to the server

$foo1->save;

# call an instance method

$foo1->scratch_where_it_itches(1, 2, 3);

# call a class method (not recommended) on an instance

$foo->reindex_all_frozzes('downwards');

# read or write a class attribute using an accessor on an instance

my $height2 = $foo->height;
$foo->height($height + 17);

# create a new instance

my $foo2 = FooProxy->add(name => 'gar', drink => 'beaujolais');

# search for instances matching criteria

my @matches = FooProxy->search(name => 'troyd');

# delete an instance

$foo2->delete;

Requirements:

· Perl



Product's homepage

Requirements:



· Perl