#!/usr/local/bin/perl
print "Content-type: text/html\n\n";
print "<HTML><HEAD><TITLE>A NEW CGI PAGE</TITLE></HEAD>\n";
print "<BODY><P>";
# open file you want to include and print it.
open(IPF,"<../mait/includes/hd_default_ma.inc")
or print "Failed to open include file, $!\n";
while (<IPF>) { print; }
close IPF;
print "</P></BODY></HTML>";