in reply to POE HTTP Server
I figured it out!!!
You want to POST not GET
print LWP::UserAgent->new->post( qw[ http://localhost:8000/user/ Accept text/x-json Content-Type text/x-json ], Content => q[{"Password":"blah","Username":"blah"}], )->as_string;
In Section
Seekers of Perl Wisdom