require 'c:\ken2\config.pl';
use strict;
use warnings;
use LWP::UserAgent;

my $url = "https://LINKGOESHERE/";

my $port = 443;

my $lwp = LWP::UserAgent->new( );
my $response = $lwp->post($url, DATA=>our $USER, DATA=>our $PASS, VALUE=>"Submit");

if($response->is_success){
    print $response->content;
}
else{
    print $response->status_line, "\n";
}