my $q = new CGI;
my $userid = $q->remote_user;