LinuxSir.cn,穿越时空的Linuxsir!

 找回密码
 注册
搜索
热搜: shell linux mysql
查看: 1834|回复: 0

哪位同仁有Apache+Perl做CGI的,帮忙Run一下这个程序(分别使用GET和POST)?

[复制链接]
发表于 2010-7-24 16:02:52 | 显示全部楼层 |阅读模式
 最近写一个WebServer, 我想看看环境变量被如何设置了,以便支持Perl~但手上没有环境。十分感谢!
:thank:thank:thank:thank:thank:thank


    #!/usr/bin/perl
  #安装说明:
  #复制程序代码,并存成env.cgi
  #以ascii模式上传至主机cgi-bin目录后将属性改成755
  $|=1;
   print "Content-type: text/html\n\n";
  print "<html><head><title>环境变量清单</title>\n";
   print "</head>\n";
  print "<body>\n";
  print "<table border=1>\n";
  print "<tr>\n";
  print "<td>变量名称</td>\n";
  print "<td>目前状况</td>\n";
  print "</tr>\n";
   foreach $fieldname(keys %ENV){
  print "<tr>\n";
  print "<td>$fieldname</td>\n";
  print "<td>$ENV{$fieldname}</td>\n";
  print "</tr>\n\n";
  }
  print "</table>\n";
  print "</body></html>\n";
  exit;
您需要登录后才可以回帖 登录 | 注册

本版积分规则

快速回复 返回顶部 返回列表