Mega Code Archive

 

Categories / Perl / CGI

 

Learn about the server for a CGI request

#!/usr/bin/perl     print "Content-type: text/plain\n\n";     print "The server information:\n\n";     print "SERVER_SOFTWARE = ",$ENV{"SERVER_SOFTWARE"},"\n";     print "SERVER_NAME =  ",$ENV{"SERVER_NAME"},"\n";     print "GATEWAY_INTERFACE =  ",$ENV{"GATEWAY_INTERFACE"},"\n";     print "SERVER_PROTOCOL =   ",$ENV{"SERVER_PROTOCOL"},"\n";     print "SERVER_PORT =  ",$ENV{"SERVER_PORT"},"\n";