$basepath="/www/your/pathto/links";
$header="header.html"; # change to full path if not in the same directory
$footer="footer.html"; # as header_footer.cfg and the other cgi scripts

$id=" "; # enter in whatever id you want for the end of the footer

##################################################################
# Print the HTML header
##################################################################
sub print_header {
print "Content-type: text/html\n\n";
open (HEADER,"$basepath/$header") | | print "Could not open $basepath/$header $! \n";
while (<HEADER> ) {
print $_;
} # end of while
close (HEADER);
} # end of sub


##################################################################
# Print the HTML footer
##################################################################
sub print_footer {
open (FOOTER,"$basepath/$footer") &#0124; &#0124; print "Could not open $basepath/$footer $! \n";
while (<FOOTER> ) {
print $_;
} # end of while
close (FOOTER);
print "$id\n";
} # end of sub