hi
i think i see your problem

if you edit this line in the "comment out" section

open (mailfile,">>".$mailfile);

to 

open (mailfile,">> ".$mailfile) or die "$0: couldnt open $mailfile :$!";

note the space after the >>  in ">> "

 you could also write ">> $mailfile" instead of ">> ".$mailfile 
 but that's just a matter of taste

hope it works
in any case it will show the error perl generates

MVG 

Remco Schoeman

The Lodge



-----Original Message-----
From: Peter Bosmans [mailto:[EMAIL PROTECTED]]
Sent: maandag 10 september 2001 17:25
To: [EMAIL PROTECTED]
Subject: I'm stuck


Hi,

I've a little problem. 
The next cgiscript doesn't work. (The mailfile will be created but i get
a server error at my browser) 
But if i comment the 3 lines between "comment out", then this script
will work. (i see the generated HTML-page at my browser)
Does anybody see what the problem is ? 
Thanks in advance

Peter

#!/usr/local/bin/perl -w
 
use CGI;
 
$query = new CGI;
$teamleader = "me.myself\@my_island.see";
 
$mailfile = "/home/myself/mymail.".$$;

# Comment out these lines and this perl script will work
open (mailfile,">>".$mailfile);
print mailfile "Originator : ".$query->param('ORIG')."\n";
close (mailfile);
# End comment out
 
#unlink ($mailfile);
 
print $query->header('text/html');
print $query->start_html('Input CR','me.myself\@my_island.see');
print $query->h1('Your request is sended to the teamleader
:'.$teamleader);
print $query->end_html();

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to