kablamo / http-request-ascurl Goto Github PK

#!/usr/bin/env perl
use 5.014;
use warnings;

use HTTP::Request::Common;
use HTTP::Request::AsCurl;

my $request = POST 'http://google.com/search', { q => 'foo' };

system $request->as_curl;