M
Morten Guldager
Aloha!
I have written a small client and server using SOAP::Lite.
Things works, but are a bit noisy.
Server code:
#!/usr/bin/perl
use strict;
use warnings;
use SOAP::Transport::HTTP;
my $daemon = SOAP::Transport::HTTP:aemon
-> new (LocalAddr => 'localhost',
LocalPort => 12345,
Reuse => 1);
$daemon->dispatch_to('loctim');
$daemon->handle;
sub loctim
{
my ($self, $x) = @_;
my $lt = localtime($x);
return "$x = $lt";
}
Client code:
#!/usr/bin/perl
use strict;
use warnings;
use SOAP::Lite;
my $S = SOAP::Lite
-> proxy("http://localhost:12345");
my $t = $S->loctim(time()) -> result();
warn "t = $t\n";
But the server warns me at every request:
use_prefix has been deprecated. if you wish to turn off or
on the use of a default namespace, then please use either
ns(uri) or default_ns(uri)
at /usr/lib/perl5/vendor_perl/5.8.8/SOAP/Lite.pm line 858.
Env: SUSE-10.1 linux, perl v5.8.8, SOAP::Lite 0.66-11
Is there a good-clean-easy fix around?
(besides simply hacking away the "warn" in SOAP/Lite.pm)
Best regards,
/Morten %-)
I have written a small client and server using SOAP::Lite.
Things works, but are a bit noisy.
Server code:
#!/usr/bin/perl
use strict;
use warnings;
use SOAP::Transport::HTTP;
my $daemon = SOAP::Transport::HTTP:aemon
-> new (LocalAddr => 'localhost',
LocalPort => 12345,
Reuse => 1);
$daemon->dispatch_to('loctim');
$daemon->handle;
sub loctim
{
my ($self, $x) = @_;
my $lt = localtime($x);
return "$x = $lt";
}
Client code:
#!/usr/bin/perl
use strict;
use warnings;
use SOAP::Lite;
my $S = SOAP::Lite
-> proxy("http://localhost:12345");
my $t = $S->loctim(time()) -> result();
warn "t = $t\n";
But the server warns me at every request:
use_prefix has been deprecated. if you wish to turn off or
on the use of a default namespace, then please use either
ns(uri) or default_ns(uri)
at /usr/lib/perl5/vendor_perl/5.8.8/SOAP/Lite.pm line 858.
Env: SUSE-10.1 linux, perl v5.8.8, SOAP::Lite 0.66-11
Is there a good-clean-easy fix around?
(besides simply hacking away the "warn" in SOAP/Lite.pm)
Best regards,
/Morten %-)