improved translation of -F curl flag

[szabgab]

Trying the following URL on https://corion.net/curl2lwp.psgi gives us some encoded form data

curl -X POST -F field=value -F name=Corion "https://httpbin.org/post" -H  "accept: application/json"

The following "translation" might be better:

use strict;
use warnings;

use LWP::UserAgent ();
use HTTP::Request::Common qw(POST);

my $ua = LWP::UserAgent->new(timeout => 10);
my $url = 'https://httpbin.org/post';
my %content = (
    field => 'value',
    name => 'Corion',
);

my $request = POST $url, 'Content-Type' => 'form-data', Content => \%content;
my $response = $ua->request($request);
print $response->decoded_content;

[Corion]

Thank you for suggesting this!

I've implemented this in v0.49 , just released to CPAN