#!/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;