Perl=〉Delphi的代码转换

Question

这是使用SOAP的一段Perl代码，高手帮忙给转换成Delphi，谢谢my $Key = SOAP::Data->name('Key' => 'KeyValue')
                          ->attr({'xmlns' => "http://****"});
my $sKey = SOAP::Data->name('sKey' => 'SKeyValue')
                          ->attr({'xmlns' => "http://******"});
return SOAP::Data->name("in1" => \SOAP::Data->value($Key,$sKey))        
                 ->type("ns1:Principal")
                 ->attr({'xmlns:ns1' => "http://********", 'xmlns' => "http://***********"});没有分了：（

Answer 1

要用 hash 表perl 與 php 的數組相當於高級語言裡的 hash 表。