Sending an object to a web service

Marge131

I am trying to do a web service request but I am stuck...

I need to send a object to the web service but I am getting a "Cannot find dispatch method for {}getStudentInfo" error back.

I also need to know how to get back the results.

This is what I tried so far...

#!/usr/bin/perl -w

#use SOAP::Lite;
use SOAP::Lite 'trace', 'debug';

use IO:ocket;
$hostname="CSDCMSADM01.admin.edmc.adm"; #change this to your hostname
my($addr)=inet_ntoa((gethostbyname($hostname))[4]);

my $results;
my $applicationName;
my $originalIP;
my $item;
my $studentID;

print "Connecting to Price Service...\n";

my $loc;

#set object attributes
$loc->{$applicationName} = "StudentPull";
$loc->{$originalIP} = $addr;
$loc->{$item} = "AICDC";
bless($loc);

my $stud;

#set object attributes
$stud->{$studentID} = "7334584";
bless($stud);

print SOAP::Lite
->service('http://csdbeaadm02:8080/soa/MarketingService?wsdl')
->getStudentInfo($loc, $stud, $results);


------------------------------
I enclosed the error message I am getting back.

Thanks