Help for this page
my $response_body; $curl->setopt(CURLOPT_WRITEDATA,\$response_body); print STDERR $response_body;
my $response_body = ""; open my $response_handle, '>', \$response_body; $curl->setopt(CURLOPT_WRITEDATA,\$response_handle); print STDERR $response_body;