use CGI qw(:standard :cgi-lib); print header; print "", `whoami`, "";