Select Code to Download

sub email {
    my ($self, $data) = @_;
...
    }
    $self->{kf}->_c("EmailInvoice", $data);
}

<?xml version="1.0" encoding="UTF-8"?>
<soap:Envelope xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/" 
+xmlns:s1="KashFlow/AbstractTypes" xmlns:soapenc="http://schemas.xmlso
+ap.org/soap/encoding/" xmlns:tns="KashFlow" xmlns:xsd="http://www.w3.
+org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-insta
+nce" soap:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/">
...
      </EmailInvoice>
   </soap:Body>
</soap:Envelope>

EmailInvoice => {
    endpoint => 'https://securedwebapp.com/api/service.asmx',
...
      SOAP::Data->new(name => 'RecipientEmail', type => 'xsd:string', 
+attr => {}),
    ], # end parameters
  }, # end EmailInvoice

sub _c {
    my ($self, $method, @args) = @_;
...
    if ($explanation) { croak($explanation) }
    return $result;
}

$VAR1 = {
          'FromName' => 'Billing',
...
          'InvoiceNumber' => '239925',
          'SubjectLine' => 'Invoice from Billing for February 2015'
        };