use Carp;
use Data::Dumper qw/Dumper/;
use English qw/ -no_match_vars /;
use TryCatch;
use JSON qw/decode_json/;
extends 'W3C::SOAP::Client';
our $VERSION = version->new('0.007');
has _response =>
t );
}
elsif ( $type eq 'application/json' ) {
# process JSON
$content = decode_json($content);
}
elsif ( $type eq 'text
element => './@element';
has_xpath_value profile => './@profile';
has_xpath_value json => './@json:serialize';
has_xpath_object_list param => (
'./wadl:param' => 'W3C::SOAP::WADL::Do
aits;
use W3C::SOAP::WADL::Meta::Method;
use MooseX::Types::Moose qw/Str Int HashRef/;
use JSON qw/decode_json/;
use W3C::SOAP::Utils qw/ns2module/;
use TryCatch;
Moose::Exporter->setup_import_method
pace wadl => 'http://wadl.dev.java.net/2009/02';
add_xpath_namespace json => 'http://rest.domain.gdl.optus.com.au/rest/3/common-json';
has_xpath_value target_namespace => './@targetNamespace';
has_xp