请教一段SOAP客户端代码
时间：2011-04-20
来源：互联网
看了几天资料，编写出来的代码返回的都不正确。
目前已知如下信息：
服务地址：http://127.0.0.1:9080/axis/services/BizService
方法名称：public String runBiz(String packageName, String bizDataXML)
这个接口是输入一个XML类型的字串，返回一个字符串
$bizDataXML="<?xml version=\"1.0\" encoding=\"GB2312\"?>
<root>
<data>
<WGINFOR>XXXXXXXX</WGINFOR>
<TIME>2010-09-19 18:17:20</TIME>
";
请教高人在perl里面该怎么写这个SOAP的客户端？
先谢了
目前已知如下信息：
服务地址：http://127.0.0.1:9080/axis/services/BizService
方法名称：public String runBiz(String packageName, String bizDataXML)
这个接口是输入一个XML类型的字串，返回一个字符串
$bizDataXML="<?xml version=\"1.0\" encoding=\"GB2312\"?>
<root>
<data>
<WGINFOR>XXXXXXXX</WGINFOR>
<TIME>2010-09-19 18:17:20</TIME>
";
请教高人在perl里面该怎么写这个SOAP的客户端？
先谢了
作者: SAS 发布时间: 2011-04-20
我现在的代码如下：
复制代码
但是返回的值肯定是不正确的，
而且信息中有
SOAP::Transport::HTTP::Client::send_receive: HTTP/1.1 500 Internal Server Error
是那个参数不对吗？请高人指教
- #!/usr/bin/perl
- use SOAP::Lite +trace;
- my $bizDataXML="<?xml version=\"1.0\" encoding=\"GB2312\"?>
- <root>
- <data>
- <WGINFOR>XXXXXXXX</WGINFOR>
- <TIME>2010-09-19 18:17:20</TIME>
- ";
-
- my $s = SOAP::Lite
- ->uri('runBiz')
- ->proxy("http://127.0.0.1:9080/axis/services/BizService");
- my $modth=SOAP::Data->name('runBiz')
- ->attr(packageName=>"ISS_KM",
- bizDataXML=>$$bizDataXML
- );
- print $s->result();
而且信息中有
SOAP::Transport::HTTP::Client::send_receive: HTTP/1.1 500 Internal Server Error
是那个参数不对吗？请高人指教
作者: SAS 发布时间: 2011-04-20
没人对这块熟悉么
作者: SAS 发布时间: 2011-04-20
相关阅读 更多
热门阅读
-
office 2019专业增强版最新2021版激活秘钥/序列号/激活码推荐 附激活工具
阅读：74
-
如何安装mysql8.0
阅读：31
-
Word快速设置标题样式步骤详解
阅读：28
-
20+道必知必会的Vue面试题（附答案解析）
阅读：37
-
HTML如何制作表单
阅读：22
-
百词斩可以改天数吗？当然可以，4个步骤轻松修改天数！
阅读：31
-
ET文件格式和XLS格式文件之间如何转化？
阅读：24
-
react和vue的区别及优缺点是什么
阅读：121
-
支付宝人脸识别如何关闭?
阅读：21
-
腾讯微云怎么修改照片或视频备份路径?
阅读：28
