use strict;
use warnings;
use MySOAPService qw(:all);

# Data file
my $dataFile = "/path/to/dataToPost.xml";

# Open our input file
open(INFILE, $dataFile) or die "Could not open $dataFile: $!\n";

# Set our variable to read contents of our input file
my $postData = do { local $/; <INFILE> };

# Close our input file
close(INFILE);

# Get a response from the post data
my $response = soapCallFromWSDLModule($postData);

print "Response from server: $response\n";