How to submit form from perl?

[Travistee2]

I want to write a perl script to fill out a form and submitit.

This is the url the form sends data to.

print
"Location:

http://www.somewhere.com/wwwboard/cgi-bin/wwwboard/wwwboard.pl?nam

e=cindy&subject=new&body=saysomething";

Should this work?
If it does, how do I get it to continue in the script instead
of ending the script on the "print location"?

 

[KevinADC]

first, that is not a form, that is a URI that is sending data to a script in the query string. Similar to a form, but not a form.

Without having any idea what you are trying to do, I suggst you look into the LWP module since it sounds like you want to send and recieve data and process the data the remote script returns to your script.

 

[Travistee2]

print
"Location:

http://www.somewhere.com/wwwboard/cgi-bin/wwwboard/wwwboard.pl?nam

e=cindy&subject=new&body=saysomething";

I am trying to simulate what the form sends to the script.

<a name="post"><center><h2>Post A Message!</h2></center></a>
<form method=POST action="/cgi-bin/

http://wwwboard/wwwboard.pl">

So, the form uses the POST method to send the string to the
perl script.

I want to send the same post to multiple scripts

 

[PaulTEG]

This wouldn't be for a board spamming application would it?

 

[KevinADC]

I already told you what to look into, LWP, hopefully I am not unwittingly assisting a person looking to send spam.

 

[Travistee2]

Don't get paranoid. Its not for spamming forums. I have a few forums of my own that I want to post the same things to.

 

[Travistee2]

I looked at the LWP module. It has quite a long list of functions.

Can someone narrow it down to the ones that let me send data to another script as if it was sent from a FORM POST.

Since I have no control over the script it is sending to, I
can't assume I will have something to check to see if it was succesful.

Do I really have to use the LWP module, or is there a more direct way to code it.

Thanks

 

[PaulTEG]

LWP is simple, look at the examples

on your command line

perldoc lwpcook

HTH
--Paul

Spend an hour a week on CPAN, helps cure all known programming ailments ;-)

 

[Travistee2]

I tried this based on the example I found at:

http://www.perl.com/pub/a/2002/08/20/perlandlwp.html?page=2

############
use strict;
use warnings;
#use LWP 5.64;
use LWP::Simple;
my $browser = LWP::UserAgent->new;

my $url = '

http://somewhere.com/wwwboard/index.html';

my $response = $browser->post( $url,
[ 'name' => 'cindy', 'email' => 'cindy@nowhere.com',
'subject' => 'new', 'body' => 'whatever I wrote',
]
);
print "form was sent";

############

I had to take out
#use LWP 5.64;
because it gets an internal server error.
So I replaced it with use LWP::Simple;

However when I tried it with
use LWP::Simple;
I don't get an error,but I just get a blank page, not
even printing "form was sent";

Any ideas on what I am missing?