当前位置: 首页 > 图文教程 > 操作系统 > Unix/Linux > 利用Perl列出系统环境变量清单范例

Unix/Linux
在X-windows下可以设置墙纸吗?
ReiserFS文件系统
GRUB多重启动管理器
Linux各项系统开机服务的功能是什么?有哪些可以关掉?
怎样添加ReiserFS文件系统
Linux 网管 123 --- 第10章. 升级 Linux 及其他应用软体 -3.保持
Linux 网管 123 --- 第10章. 升级 Linux 及其他应用软体 -4.Li
Linux 网管 123 --- 第10章. 升级 Linux 及其他应用软体 -5.升级
Linux 网管 123 --- 第10章. 升级 Linux 及其他应用软体 -6.作一
Linux 网管 123 --- 第10章. 升级 Linux 及其他应用软体 -7.升级
Linux 网管 123 --- 第10章. 升级 Linux 及其他应用软体 -8.Ap
Linux 网管 123 --- 第10章. 升级 Linux 及其他应用软体 -9.Se
Linux 网管 123 --- 第11章. 在企业里的电脑使用 Linux -1.使用
Linux 网管 123 --- 第11章. 在企业里的电脑使用 Linux -2.伺服器
Linux 网管 123 --- 第12章. 保持伺服器安全的策略
Linux环境下发现并阻止系统攻击
linux内核的编译
Linux简明系统维护手册(三)
Linux简明系统维护手册(四)
在Linux中制作VCD

Unix/Linux 中的 利用Perl列出系统环境变量清单范例


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-01   浏览: 213 ::
收藏到网摘: n/a


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