#!perl -w
use Net::SSL;
use SOAP::Lite;
$SOAP::Constants::DO_NOT_USE_CHARSET = 1;
use XML::LibXML;
my ($function, @params) = @ARGV;

$ENV{HTTPS_CERT_FILE} = "./xxxxx.crt";
$ENV{HTTPS_KEY_FILE} = "./xxxxx.key";

my $sitetoken= SOAP::Header->name( CODE REMOVED );
my $ppsoapheader=SOAP::Header->name( CODE REMOVED );
my $auth = SOAP::Header->name( CODE REMOVED );
my $namespace = SOAP::Data->new( CODE REMOVED );

$soap_response =  SOAP::Lite
  -> uri('http://schemas.xxxxx.com/Passport/SoapServices/CredentialServiceAPI/V1')
  -> proxy('https://api.login.yyyyy.com/pksecure/PPSACredentialPK.srf')
  -> GetEDUMigrationData($namespace, $ppsoapheader, $auth);