Select Code to Download

$arg = 'Hello SOAP'

<s-gensym3 xsi:type="xsd:string">Hello SOAP</s-gensym3>

<Result xsi:type="xsd:string">Hello SOAP</Result>

@arg = qw(foo bar baz qux)

...
<s-gensym5 xsi:type="xsd:string">bar</s-gensym5>
<s-gensym7 xsi:type="xsd:string">baz</s-gensym7>
<s-gensym9 xsi:type="xsd:string">qux</s-gensym9>

<item xsi:type="xsd:string" id="i3" SOAP-ENC:root="0">foo</item>
<item xsi:type="xsd:string" id="i4" SOAP-ENC:root="0">bar</item>
<item xsi:type="xsd:string" id="i5" SOAP-ENC:root="0">baz</item>
<item xsi:type="xsd:string" id="i6" SOAP-ENC:root="0">qux</item>

$arg = [foo=>bar=>baz=>'qux']

...
  <foo xsi:type="xsd:string">bar</foo>
  <baz xsi:type="xsd:string">qux</baz>
</s-gensym3>

$arg = {foo=>{bar=>{baz=>['qux']}},bar=>[bar=>{baz=>'qux'}]}

...
  </item>
 </bar>
</s-gensym3>