Beefy Boxes and Bandwidth Generously Provided by pair Networks
Just another Perl shrine
 
PerlMonks  

Re^2: Battling form spam

by rickaltman (Initiate)
on Nov 22, 2010 at 06:15 UTC ( [id://872894]=note: print w/replies, xml ) Need Help??


in reply to Re: Battling form spam
in thread Battling form spam

pKai, thank you very much for the reply. In trying to implement your suggested changes, I botched something up. The beginning of the sub send_email routine now looks like this:

-----------

sub send_email {

$query->param('human')

{

$FullName = $query->param("FullName");

etc.

-----------

My tests now return this:

syntax error at form.cgi line 632, near ")

{"

syntax error at form.cgi line 832, near "}"

Execution of form.cgi aborted due to compilation errors.

As you can plainly see, I'm pretty lame with all of this so any hand-holding that you can provide would be appreciated. A copy of the script is available at http://betterppt.com/form.txt if you need to see it.

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://872894]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others exploiting the Monastery: (3)
As of 2024-04-19 20:04 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found