,
David
- Original Message -
From: Soheil Shaghaghi [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Saturday, August 10, 2002 1:41 AM
Subject: Problem with the code
Hi everyone,
The following sub checks for bad e-mail address, and reports it:
if (($self-{_Email
Hi everyone,
The following sub checks for bad e-mail address, and reports it:
if (($self-{_Email} =~ /(@.*@)|(\.\.)|(@\.)|(\.@)|(^\.)/ || $self-{_Email}
!~ /^.+\@(\[?)[a-zA-Z0-9\-\.]+\.([a-zA-Z]{2,3}|[0-9]{1,3})(\]?)$/)) {
$cool = undef; # No longer cool
$message
I can't get any response from the location I am trying to contact. I can reach
an external location like www.yahoo.com without any problem. When I use my web
browser I have no problem receiving a response from the CGI even if I give bad
information to the POST. I know I am not using a proxy.
First you should always use strict. It'll help catch things like your misspeling
of jonh. The request you are sending is for a POST, which means that the
form data has to be passed in the body of the request, which you forgot to do.
So just add:
$req-content($john);
Correct the spelling