Help for this page
> perl -MLWP::UserAgent -e "$ua=LWP::UserAgent->new();$ua->default_hea +der('Content-type' => 'application/json;odata=verbose'); $ua->add_handler('request_send',sub{shift->dump;return}); ... Content-Type: application/x-www-form-urlencoded foo=bar
>perl -MLWP::UserAgent -MHTTP::Request::Common -e "$ua=LWP::UserAgent- +>new(); req= POST 'http://localhost:1234', 'Content-type' => 'applicati +on/json;odata=verbose', Content => { foo => 'bar' }; ... foo=bar