Hello
I am trying to create a .pl script that processes data via "GET" from a form
and appends the info to a seperate .html file.
#!/usr/bin/perl
#file name addfile.pl
$form_data = $ENV{'QUERY_STRING'};
open(FORMDATA,">>../formdata.html");
print "Content-type: text/html", "\n\n";
print "<HTML> \n <HEAD> \n <TITLE></TITLE>\n </HEAD>\n";
print "<BODY>\n";
foreach $pair(split(/&/,$form_data)) {
print "$pair<BR>";
}
($form_name,$first) = split(/=/, $fields[0]);
write(FORMDATA);
close(FORMDATA);
_________________________________________________________________
Get your FREE download of MSN Explorer at http://explorer.msn.com/intl.asp
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
