my $finalXML = $self->getFinalXML();

    my $POST_URL = $self->getProcessingURL();

    print $finalXML, "\n";

    use Net::SSLeay;
    my ($page, $response, %reply_headers) =
        Net::SSLeay::post_https(
            'dev.xmlsite.com',
            11800,
            '',
            Net::SSLeay::make_headers('Content-Type' => 'text/xml'),
            "CLRCMRC_XML=$finalXML"
        );

    foreach my $key (keys %reply_headers) {
        print "$key: ", $reply_headers{$key}, "\n";
    }
    print 'Response: ', $response, "\n";
    print 'Page: ', $page, "\n";