Maybe I will when I figure out how the LWP module works. Being new to this, I'm not so interested in the best or most correct solution as I am in getting the damn thing to work in the first place. :-)
#!/usr/bin/perl -w
use strict;
use LWP::UserAgent;
use URI::URL;
my $WWWAgent = new LWP::UserAgent();
my $url=new URI::URL 'http://www.perlmonks.org/index.pl';
$url->query_form(node_id => "131");
my $WWWRequest = new HTTP::Request 'POST', $url->as_string() ;
my $WWWResult = $WWWAgent->request($WWWRequest);
die "Error logging in $WWWResult->code $WWWResult->message" if(!$WWWRe
+sult->is_success);
print $WWWResult->content;