#!/usr/bin/perl require "cgi-lib.pl"; $gbook = "guestbook.txt"; print "Content-type:text/html\n\n"; print ""; print "Guest Book\n"; print "\n"; print "
Guest Book
\n"; open(FILE, "$gbook"); @data=; close(FILE); print "@data"; print "
"; print "\n";