我有一个 Java Web 应用程序,它需要调用位于不同服务器上的 Web 服务。
这是我调用该服务的 perl 脚本的代码:
#!/usr/bin/perl -w
use SOAP::Lite;
my $user = 'user';
my $password = 'password';
my $loginURI = "http://someserver:8080/SakaiLogin.jws?wsdl";
my $scriptURI = "http://someserver:8080/sakai-axis/scripts/RosterService.jws?wsdl";
my $loginsoap = SOAP::Lite
-> proxy($loginURI)
-> uri($loginURI);
my $scriptsoap = SOAP::Lite
-> proxy($scriptURI)
-> uri($scriptURI);
my $session = $loginsoap->login($user, $password)->result;
# doSiteRoster(session, site_id, user_id)
my $result = $scriptsoap->doSiteRoster($session, "cfc338aa-acfb-41a6-a998-7e467afc297b", "djswartz")->result;
my $logout = $loginsoap->logout($session)->result;
exit;
现在,我想我可以使用 javax.xml.ws.Service ......虽然我不太确定如何去做。任何方向都会很棒。