Select Code to Download

my $heartbeat = SOAP::Lite->new(proxy => $proxy);
    $heartbeat->default_ns('lws:Heartbeat');
...
    $self->call( "heartbeat", "sendPulse", \@message);

    print "WE're back!!\n";

sub call
{
...

    if($cmd ne "login")

        $self->{$handle}->call( $cmd, @{$params} );