PERL CODE:
my $soap = SOAP::Lite
-> proxy("http://netOpsComWs/NetOpsComService", timeout=>240);
my $serializer = $soap -> serializer();
$serializer->uri('http://www.example.com/');
$soap->autotype(0);
my @query = (
SOAP::Data->name('xngId' => $xngId));
my $netOpsComContactResults;
eval {
$netOpsComContactResults = $soap->call('getSiteInfoByXngId' => @query);
};
PHP CODE:
$soap= new SoapClient("http://netOpsComWs/NetOpsComService?wsdl");
$serializer = $soap -> serializer('http://www.example.com/');
if($soap->autotype(0)){
$query =$soap->data->xngId;
}
function getLink($netOpsComContactResults){
$netOpsComContactResults = $soap->call(getSiteInfoByXngId($query));
}