home *** CD-ROM | disk | FTP | other *** search
/ PC World 2000 September / PCWorld_2000-09_cd.bin / Komunik / sambar / _setup.1 / environ.pl < prev    next >
Text File  |  1999-10-07  |  1KB  |  28 lines
  1.  
  2. read(STDIN, $CONTENT, $ENV{'CONTENT_LENGTH'});
  3.  
  4. print<<END;
  5. Sambar Server CGI Environment Variables
  6. <P>
  7. <table border=0 cellpadding=2>
  8. <tr><td>GATEWAY_INTERFACE:</td><td> $ENV{'GATEWAY_INTERFACE'}</td></tr>
  9. <tr><td>PATH_INFO:        </td><td> $ENV{'PATH_INFO'}        </td></tr>
  10. <tr><td>PATH_TRANSLATED:  </td><td> $ENV{'PATH_TRANSLATED'}  </td></tr>
  11. <tr><td>QUERY_STRING:     </td><td> $ENV{'QUERY_STRING'}     </td></tr>
  12. <tr><td>REMOTE_ADDR:      </td><td> $ENV{'REMOTE_ADDR'}      </td></tr>
  13. <tr><td>REMOTE_HOST:      </td><td> $ENV{'REMOTE_HOST'}      </td></tr>
  14. <tr><td>REMOTE_USER:      </td><td> $ENV{'REMOTE_USER'}      </td></tr>
  15. <tr><td>REQUEST_METHOD:   </td><td> $ENV{'REQUEST_METHOD'}   </td></tr>
  16. <tr><td>DOCUMENT_NAME:    </td><td> $ENV{'DOCUMENT_NAME'}    </td></tr>
  17. <tr><td>DOCUMENT_URI:     </td><td> $ENV{'DOCUMENT_URI'}     </td></tr>
  18. <tr><td>SCRIPT_NAME:      </td><td> $ENV{'SCRIPT_NAME'}      </td></tr>
  19. <tr><td>SCRIPT_FILENAME:  </td><td> $ENV{'SCRIPT_FILENAME'}  </td></tr>
  20. <tr><td>SERVER_NAME:      </td><td> $ENV{'SERVER_NAME'}      </td></tr>
  21. <tr><td>SERVER_PORT:      </td><td> $ENV{'SERVER_PORT'}      </td></tr>
  22. <tr><td>SERVER_PROTOCOL:  </td><td> $ENV{'SERVER_PROTOCOL'}  </td></tr>
  23. <tr><td>SERVER_SOFTWARE:  </td><td> $ENV{'SERVER_SOFTWARE'}  </td></tr>
  24. <tr><td>CONTENT_LENGTH:   </td><td> $ENV{'CONTENT_LENGTH'}   </td></tr>
  25. <tr><td>CONTENT:          </td><td> $CONTENT                 </td></tr>
  26. </table>
  27. END
  28.