my %methods = ( ActivateLicense => { endpoint => '', soapaction => '', namespace => '', parameters => [ SOAP::Data->new(name => 'timestamp', type => 'tns:timestamp', attr => {}), SOAP::Data->new(name => 'guid', type => 'tns:guid', attr => {}), SOAP::Data->new(name => 'machineName', type => 'tns:machineName', attr => {}), ], # end parameters }, # end ActivateLicense ) #### my %foo = Mercury::ActivateLicense( timestamp => $s{timestamp}, guid => $s{guid}, machineName => $s{machineName} ); #### #### TIMESTAMP GUID FOO