动网论坛,站长建站首选,国内使用量最多的论坛软件 动网论坛官方技术讨论区 站长工具 申请属于您自己的免费论坛
首页 | 新闻资讯 | 网站运营 | 网络编程 | 数据库 | 服务器 | 网页设计 | 图像媒体 | 网络应用 | 搜索优化 | 资源下载 | 动网主机 | DVBOX
    本站内  互联网 ASP论坛  ASP.Net论坛  PHP论坛
   Cgi/Perl → 阅读文章

 CGI教程(6)调用CGI脚本文件的例子之四

作者:郁郁小蝎 来源:中国站长学院 
阅读 1954 人次 , 2006-2-15 14:34:00 

调用CGI脚本文件的例子

//以下是mas_cvo.cpp文件

#include "t99_type.h"

#include

#include

inline void html( char str[] ) { cout << str << "\n"; }

inline void html_( char str[] ) { cout << str; }

inline void html_( char c ) { cout << c; }

// 传递调试选项

// 可以由脚本看到的环境变量

char* getenv_n( char var[] )

{

char *p = getenv( var );

return p == NULL ? (char*)"[]" : p;

}

void cgi_var_output( )

{

html("");

html("");

html( "
" );

html_("AUTH_TYPE "); html( getenv_n( "AUTH_TYPE" ) );

html_("CONTENT_LENGTH "); html( getenv_n( "CONTENT_LENGTH" ) );

html_("CONTENT_TYPE "); html( getenv_n( "CONTENT_TYPE" ) );

html_("GATEWAY_INTERFACE "); html( getenv_n( "GATEWAY_INTERFACE" ) );

html_("HOSTTYPE "); html( getenv_n( "HOSTTYPE" ) );

html_("HTTP_ACCEPT "); html( getenv_n( "HTTP_ACCEPT" ) );

html_("HTTP_CONNECTION "); html( getenv_n( "HTTP_CONNECTION" ) );

html_("HTTP_HOST "); html( getenv_n( "HTTP_HOST" ) );

html_("HTTP_PRAGMA "); html( getenv_n( "HTTP_PRAGMA" ) );

html_("HTTP_REFERER "); html( getenv_n( "HTTP_REFERER" ) );

html_("HTTP_USER_AGENT "); html( getenv_n( "HTTP_USER_AGENT" ) );

html_("OSTYPE "); html( getenv_n( "OSTYPE" ) );

html_("PATH_INFO "); html( getenv_n( "PATH_INFO" ) );

html_("PATH_TRANSLATED "); html( getenv_n( "PATH_TRANSLATED" ) );

html_("QUERY_STRING "); html( getenv_n( "QUERY_STRING" ) );

html_("REMOTE_ADDR "); html( getenv_n( "REMOTE_ADDR" ) );

html_("REMOTE_HOST "); html( getenv_n( "REMOTE_HOST" ) );

html_("REMOTE_IDENT "); html( getenv_n( "REMOTE_IDENT" ) );

html_("REMOTE_USER "); html( getenv_n( "REMOTE_USER" ) );

html_("REQUEST_METHOD "); html( getenv_n( "REQUEST_METHOD" ) );

html_("SCRIPT_NAME "); html( getenv_n( "SCRIPT_NAME" ) );

html_("SERVER_NAME "); html( getenv_n( "SERVER_NAME" ) );

html_("SERVER_PORT "); html( getenv_n( "SERVER_PORT" ) );

html_("SERVER_PROTOCOL "); html( getenv_n( "SERVER_PROTOCOL" ) );

html_("SERVER_SOFTWARE "); html( getenv_n( "SERVER_SOFTWARE" ) );

html("<P>");

html("Unix command printenv");

cout << flush;

system( "printenv | sort" );

html("

");

html("Unix command set");

cout << flush;

system( "set | sort " );

html( "

" );

html( "" );

html( "" );

}

  实际上,CGI脚本也可以用其它的语言来编写。如果你使用C语言来编写并且是在UNIX系统中,最好是使用版本高于2.7.0的gcc编译器,因为这个编译器支持新的数据类型:bool(布尔型)。
  
 
 收藏本文  打印本文  论坛讨论  关闭窗口
· 上一篇:CGI教程(6)调用CGI脚本文件的例子之三
· 下一篇:CGI教程(7)解码数据发送给CGI脚本之一
· Perl教学 第六篇 模式匹配之一
· PerlScript 的介绍之一
· CGI教学:CGI安全问题(七)
· Template Toolkit 的配置选项
· Perl常见特殊变量


关于本站 | 联系我们 | 业务合作 | 客户案例 | 诚聘英才 | 广告合作 | 收藏本站
海口动网先锋网络科技有限公司版权所有
Copyright © 2000 - 2006 Cndw.Com
中华人民共和国电信与信息服务业务经营许可证编号 琼 ICP 020077