view release on metacpan or  search on metacpan

Changes  view on Meta::CPAN

10
11
12
13
14
15
16
17
18
19
20
21
0.21
        - Fixed check on Storable version for parse_option()
 
0.30    Wed May 11 18:07:11 BST 2011
        - Added callBatch () to make AMF batch RPC possible
 
0.31    Fri May 4 17:33:56 2012 +0100
        - Support different source and destination in AMF remoting package (patch by Aleksey Komarov)
 
0.32    Fri May  4 18:59:18 BST 2012
        - Fixed bug to correctly decode the HTTP response using decoded_content() when the AMF
          gateway supports HTTP Accept-Encoding request headers (bug report by Markus Ortner)

lib/AMF/Connection.pm  view on Meta::CPAN

265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
my $http_response = $class->{'ua'}->post(
        $class->{'endpoint'}.$class->{'append_to_endpoint'}, # TODO - check if append to URL this really work for HTTP POST
        Content_Type => "application/x-amf",
        Content => $request_stream->getStreamData()
        );
 
croak "HTTP POST error: ".$http_response->status_line."\n"
        unless($http_response->is_success);
 
my $response_stream = new AMF::Connection::InputStream( $http_response->decoded_content, $class->{'input_amf_options'});
my $response = new AMF::Connection::Message;
$response->deserialize( $response_stream );
 
#print STDERR Dumper( $response )."\n";
 
# process AMF response headers
$class->_process_response_headers( $response );
 
my @all = @{ $response->getBodies() };