#!perl
use strict;
use warnings;

use LWP::UserAgent;

my $ua = LWP::UserAgent->new( 'send_te' => '0' );
my $r  = HTTP::Request->new(
    'POST' => 'https://api.mysite.com/2022-01-08/enrich/upload',
    [
        'Accept'         => '*/*',
        'Authorization'  => 'Basic YW55X3N0cmluZzp7c2VjdXJlX3Rva2VufQ==',
        'User-Agent'     => 'curl/7.55.1',
        'Content-Length' => '52',
        'Content-Type'   => 'application/x-www-form-urlencoded'
    ],
    "data=testme\x40mysite.com&webhook=http://mywebhook.com/"
);
my $res = $ua->request( $r, );



__END__

Created from curl command line
 curl -X POST https://api.mysite.com/2022-01-08/enrich/upload -u any_string:{secure_token} -d data="testme@mysite.com" -d webhook="http://mywebhook.com/"