And here's the test server script - "logging_script" @ "https://domain.com/path/to/logging_script"#!/usr/bin/perl use strict; use warnings; use SOAP::Lite; use Data::Dumper; my $hashref = {1 => 'one', 2 => 'two'}; my $arrayref = [1,2,3,4,5,6]; my $args = { hashref => $hashref, arrayref => $arrayref}; my $soap = SOAP::Lite -> uri('https://domain.com/LogError') -> proxy('https://domain.com/path/to/logging_script'); my $res = $soap->test($args); print $res->result;
Basically, I was just testing sending references to the server, and they dump as expected. I had a few minor issues, but that's another story.#!/usr/bin/perl use strict; use warnings; use SOAP::Transport::HTTP; use Data::Dumper; SOAP::Transport::HTTP::CGI -> dispatch_to('LogError') -> handle; package LogError; sub test { my ($class,$args) = @_; open(LOG,">>log.txt") || return "Can't open log"; print LOG Data::Dumper::Dumper($args); print LOG "-"x60,"\n"; close(LOG); return "Everything's OK"; }
I have no experience of POE, but am already pretty impressed with what SOAP::Lite can do. I disagree about it not being popular though - there's quite an active SOAP::Lite community out there if you go looking.
.02
cLive ;-)
update - oops, renamed server sub to make sense.
In reply to Re: POE vs. SOAP
by cLive ;-)
in thread POE vs. SOAP
by braswell
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |