1 my_username my_password ##

##


   
      
         
            3144920
            2
            1
            fsTTTxUZml7QY/mu3TCkKqzrBbQ=
         
      
   


##

##

#!/usr/bin/perl -w

use strict;
use SOAP::Lite;
use Data::Dumper;

my $soap = SOAP::Lite
            -> uri ('http://my_website/Services/SoapAdapter.asmx?WSDL')
            -> proxy ('http://my_website/Services/SoapAdapter.asmx?WSDL');

my $something = $soap->Login (1, 'my_username', 'my_password');

print $something;