use CGI; my $cgi = CGI->new(); my $username = $cgi->remote_user(); #### sub remote_user { return $ENV{'REMOTE_USER'}; }