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]

Reply via email to