($USER) = $cgi->param('user') =~ /(\w+)/;