use CGI;
$username = CGI->remote_user();