#!/usr/bin/perl -w

require LWP::UserAgent;

my $ua = LWP::UserAgent->new;
my $url = 'http://someurl.jsp';
my @data = ( ['butt1', 'Resubmit submissions'], ['Max Age', '30'], ['Submissions', '9967569:4524703']);

my $response = $ua->post( $url, \@data );

if ($response->is_success) {
    print $response->content;  # or whatever
}
else {
    die $response->status_line;
}