#!/usr/bin/perl
#
print "Content-type: text/html \n\n";
print "Authenticated as: $ENV{REMOTE_USER}<br>";