NAME

Hessian::Client - Hessian 1.0 client in perl

VERSION

Version 0.01

SYNOPSIS

Quick summary of what the module does.

Perhaps a little code snippet.

use Hessian::Client;

my $foo = Hessian::Client->new(
    URL => 'http://some.hessian.service/...',
    version => 1,
    auth    => ['user','pass'], # if needed
);
my $arg1 = Hessian::True->new();
my $arg2 = 500;
my $arg3 = Unicode::String->new('hello world!');
my $bar = $foo->call('method',$arg1,$arg2,$arg3);
die $foo->{_error} unless defined $bar;
...

FUNCTIONS

new

call

raise_error

Hessian 1.0 Data types mapping

null

Hessian::Null->new();

true

Hessian::True->new();

false

Hessian::False->new();

date

DateTime (cpan)

int

normal perl integer

long

Math::BigInt

double

Hessian::Double->new(data=>20.09);

binary

Hessian::Binary->new(data=>'abcd');

string

Unicode::String->new('abcd');

xml

Hessian::XML->new(data=> Unicode::String->new('abce'));

remote

Hessian::Remote->new(type=> 'bean.x', url => 'http://bean.home');

list
Hessian::List->new(
  type => 'int[',  # optional
  len  => 3,       # optional
  data => [0,1,2],
);
map
my $joe = Hessian::Map->new(
  type => 'com.caucho.hessian.test.Person',
  data => [
      Unicode::String->new('name') => Unicode::String->new('joe')
  ]
);

Hessian::Map->new(
  type => 'com.caucho.hessian.test.Horse',
  data => [
      age => 4,
      sex => Unicode::String->new('m'), 
      owner => $joe
  ],
);

AUTHOR

du ling, <ling.du at gmail.com>

BUGS

Please report any bugs or feature requests to bug-hessian-client at rt.cpan.org, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Hessian-Client. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.

SUPPORT

You can find documentation for this module with the perldoc command.

perldoc Hessian::Client

You can also look for information at:

ACKNOWLEDGEMENTS

COPYRIGHT & LICENSE

Copyright 2009 du ling, all rights reserved.

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.