You don't say what your problem is or your OS, OS version, Webserver,
Webserver version, or Perl version, so I can only comment on the general
style of your script.
1. Buying and reading "Programming Perl" would be a good investment of your
money and time.
2. You are re-inventing quite a few wheels. Using the CGI and MIME-Lite
modules may avoid the problem you are having. It would definitely make
testing much easier. Run 'perldoc CGI' for instructions and examples of cgi
programming. At least skim the whole document before you start coding with
CGI.
3. You are using neither '-w' nor 'use strict;'. Both help avoid
inconsistencies that lead to undefined behavior. Adding them will force you
to declare your variables, so run 'perldoc perlfunc' and read about 'my'
(among many other things). 'perldoc perlop', particularly qw, would also be
useful.
4. The irregular indentation makes spotting related statements more
difficult than it should be.
5. You are converting @pairs to %FORM multiple times, only the first time is
necessary. The later times should use the already parsed values:
my %ignore = map { ( $_, 1 ) }
qw( recipient subject Senden Send thankurl );
foreach ( sort keys %FORM ) {
print MAIL "$_: $FORM{$_}\n";
}
6. I suspect you are trying to redirect the browser to a different page and
it isn't happening. The sections in 'perldoc CGI' titled 'GENERATING A
REDIRECTION HEADER' and 'USING NPH SCRIPTS' may discuss your problem. Using
CGI in the first place may avoid the problem altogether.
--
Mac :})
----- Original Message -----
From: "Richard Osborne" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Saturday, August 12, 2000 11:18 PM
Subject: In need of assistance
> I need a little assistance on a script I have been using for Automated
Form
> E-Mailing. On line 76 is where the information is. Any help would be
> greatly appreciated.
