#! C:/perl/bin/perl.exe -w

use strict;
use CGI::Carp qw(fatalsToBrowser);
use LWP::Simple;

my $webpage = get("http://servername/global/admin_menu.inc");
die "Couldn't get it: $!" unless defined $webpage;

print "Content-type: text/html\n\n";
print $webpage;