用Perl制作留言本案例之4
发表时间:2024-02-08 来源:明辉站整理相关软件相关文章人气:
[摘要]最后: $filename="c:/website/htdocs/book.html"; open(FILE,">> $filename"); print FILE "名字:$FORM{'name'...
最后:
$filename="c:/website/htdocs/book.html";
open(FILE,">> $filename");
print FILE "名字:$FORM{'name'}n";
print FILE "Email:
print FILE "留言:$FORM{'suggest'}";
close{FILE};
print "谢谢留言";
print"请观看留言本";
exit(0);
输出内容到文件和屏幕上。完成留言的程序。
book.html:
这个程序中book.html没有什么特别的要求,可以不用写,就让
程序自动生成。
现在有的cgi程序,对book.html也有设定,比如在>之间就写上注释
这样,在程序对留言数据操作的时候,就可以忽略掉文件内的其它内容。