#!/usr/local/bin/perl -w

use CGI qw(:standard :html3);

#print "hello\n";

$locat = "../../htdocs/elghome/material_office.html";

print header, start_html;

open (FILE1, $locat) || die  ("Material_Office open failed: $!");
while (<FILE1>)
{
    $page .= $_;
}
close(FILE1);

print "$page\n";
print end_html;