#!/usr/bin/perl
use XML::Writer;
use LWP::UserAgent;
my $output;
my $writer = new XML::Writer(OUTPUT => \$output);
$writer->startTag("greeting",
"class" => "simple");
$writer->characters("Hello, world!");
$writer->endTag("greeting");
$writer->end();
print $output;
my $browser = LWP::UserAgent->new;
my $url = 'http://localhost:8180/request';
my $response = $browser->post($url,Content => $output);
####
Not an ARRAY reference at /usr/share/perl5/HTTP/Request/Common.pm line 83.
##
##
my $browser = LWP::UserAgent->new;
my $url = 'http://localhost:8180/request';
my $response = $browser->post($url,$writer);