代码之家 › 专栏 › 技术社区 › aidan

使用SOAP::WSDL将SOAP功能从PHP迁移到Perl

soap perl

aidan · 技术社区 · 15 年前

$client = new SoapClient("http://thirdpartyurl.com/api.aspx?WSDL");
$info = $client->GetSomeInfo(array('username' => 'myusername', 'password' => 'mypassword'));

这很好,但我就是不能让它在perl中工作。我尝试了SOAP::Lite,但没有取得任何进展。我现在正在尝试SOAP::WSDL:

use SOAP::WSDL;
my $wsdl = SOAP::WSDL->new(wsdl => 'http://thirdpartyurl.com/api.aspx?WSDL');
my $info = $wsdl->call('GetSomeInfo', 'username', 'myusername', 'password', 'mypassword');

这根本不起作用。我查看了原始请求,perl版本甚至没有发送user/pass参数。我做错了什么?

3 回复 | 直到 15 年前

aidan 15 年前

值得一提的是,我实现了身份验证,并通过以下方式成功获取发送的参数:

use SOAP::Lite;
my $service = SOAP::Lite->proxy($service_url)->uri($service_url);

sub SOAP::Transport::HTTP::Client::get_basic_credentials {
    return 'myusername' => 'mypassword';
}

my $result = $service->insert(
    SOAP::Data->name(
        'data' => \SOAP::Data->value(
            SOAP::Data->name(
                'item' => \SOAP::Data->value(
                    SOAP::Data->name('key' => 'name'),
                    SOAP::Data->name('value' => 'new_campaign_x')
                )
            )
        )
    )->type('Map')
);

有没有更好的方法达到同样的效果?我意识到覆盖“获取基本凭证”有点不太正常。

Aquatoad 15 年前

我在我的应用程序中使用SOAP::Lite非常幸运。用户名/密码组合,应该在HTTP层还是SOAP层进行身份验证?或者只是常规的soap参数?

-1

brian d foy 15 年前

XML::Compile .

推荐文章

Manny · 如何比较Perl中的字符串?

3 年前

BioRod · 我不能用Perl打印键和值

3 年前

user17227456 · Perl CLI代码无法追加字符串行

3 年前

LearnToBeBetter · 读取文件,搜索字符串,打印字符串

3 年前

KJ7LNW · 一些波斯语文本的宽字符印刷,但其他文本则没有

3 年前

Amit M · 如何用FFI:Platypus替换cpan Perl实用程序P5NCI

3 年前

con · 如何搜索大型数据结构并返回一系列给出特定值的键/数组?

3 年前

rohithguptha potti · 在LINUX操作系统上执行一些Perl命令时,这些模块可以在LINUX中使用,也可以不在LINUX中使用

3 年前

Tonys AnsonÄ« Misirgis · 当“网站”选项卡关闭时,服务器如何知道关闭websocket的连接

7 年前

Pranay Nanda · 使用regex解析许可证文件

7 年前