用Perl制作留言本案例之4
發(fā)表時間:2024-06-12 來源:明輝站整理相關(guān)軟件相關(guān)文章人氣:
[摘要]最后: $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);
輸出內(nèi)容到文件和屏幕上。完成留言的程序。
book.html:
這個程序中book.html沒有什么特別的要求,可以不用寫,就讓
程序自動生成。
現(xiàn)在有的cgi程序,對book.html也有設(shè)定,比如在>之間就寫上注釋
這樣,在程序?qū)α粞詳?shù)據(jù)操作的時候,就可以忽略掉文件內(nèi)的其它內(nèi)容。