如何使用Perl調用.Net的Web服務

原始碼如下：
C#代碼

[WebMethod]

public string Hello()
{
   return "Hello World";

}

Perl代碼1:
#!/usr/bin/perl -w

use strict;
use SOAP::Lite;

print SOAP::Lite
    ->uri('http://tempuri.org')
    ->on_action(sub{sprintf '%s/%s',@_})
    # 使用on_action方法覆蓋預設的習慣並為SOAPAction頭指定一個新的格式
    ->proxy('http://localhost/WS/WSTest.asmx')
    ->Hello()
    ->result;

Perl代碼2:
#!/usr/bin/perl -w
use strict;
use SOAP::Lite
    proxy => 'http://localhost/WS/WSTest.asmx',
    uri => 'http://tempuri.org',
    on_action => sub{sprintf '%s/%s',@_}
    ;

my $proxy = new SOAP::Lite;

print $proxy ->Hello()->result;