#!/usr/bin/perl

use strict;
use LWP::UserAgent;
use HTTP::Request::Common;

my $URLtoPostTo = "http://www.theurltopostto.com";
my %Fields = (
   "data1" => "$email",
   "data2" => "$somethingelse",
   "data3" => "$andanother"
);

my $BrowserName = "This Be Mine";

my $Browser = new LWP::UserAgent;

if($BrowserName) { $Browser->agent($BrowserName); }

my $Page = $Browser->request(POST $URLtoPostTo,\%Fields);

#I don't need the results data