Select Code to Download

my $response = $ua->post(
    'http://...',
    Content_Type => 'application/xml',
    Content      => $xml,
);

use HTTP::Common::Request qw( POST );

...
);

my $response = $ua->request($request);