#!/usr/bin/perl -w use strict; BEGIN { use CGI::Carp qw(warningsToBrowser fatalsToBrowser); warningsToBrowser(1); } print "Content-type: text/html\n\n"; print < Home HTML do "time.cgi"; # htmlcode... do "menu.cgi"; print < HTML