view release on metacpan or  search on metacpan

lib/LWP/Simple/Post.pm  view on Meta::CPAN

    my $content;
    $content = $response->content if $response->is_success;
    return $content;
}

=head2 post_xml

 my $content = post_xml( string $url, string $data );

Having written this module, it turned out that 99% of what I needed it
for required a content-type of C<text/xml>. This does exactly what C<post>
does, only the content-type header is set to C<text/html>.	

=cut

sub post_xml {
	my ( $url, $data ) = @_;
	return post( $url, $data, { as_xml => 1 });
}

=head1 AUTHOR