Help for this page
unless (open(FH, "<", "indexfile")) { print "Content-Type: text/html\n\n<h1>NOOOOOOO!!!!!</h1>Error: $!\n" +; exit(1); }