$lite = SOAP::Lite
  -> uri($namespace)
  -> on_action( sub { join '/', @_[0,1] } )
  -> proxy('https://USERNAME:PASSWORD@wstest.solspark.com')
  -> serializer( My::Serializer->new() )
  -> deserializer ( My::Deserializer->new() )
;

package My::Serializer;
use SOAP::Lite;
use base SOAP::Serializer;

sub serialize {
    my @temp = SUPER::serialize(@_);
    warn @temp;
    return @temp
};

package My::Deserializer;
use SOAP::Lite;
use base SOAP::Deserializer;

sub deserialize {
    warn @_;
    return SUPER::deserialize(@_);
}