Sorry for editing the original post. I should have left the original and added some of my changed content. I will check out some of your suggestions.
Any other suggestions on how you would post your XML data instead of using LWP::UserAgent?
Update:
So I created a little test script, and I saw the test XML post in the jboss log correctly:
#!/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);
And I added this at the end of my current script, and got this error:
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);
I tried with Content => \$writer,
CONTENT => $writer,
and just $writer.
I'll keep fiddling with this unless someone else has suggestions on a better way to post this $writer to a specific port/url