n1.pl
来自「simple perl programs to understand suse 」· PL 代码 · 共 12 行
PL
12 行
#! /usr/bin/perlprint "Content-type:text/html\n\n";print "<h1>Server Information<h1>";print "<body bgcolor=\"red\">";print "<br><i>Server Name=",$ENV{'SERVER_NAME'};print "<br><i>Server Software=",$ENV{'SERVER_SOFTWARE'};print "<br><i>Server Protocol=",$ENV{'SERVER_PROTOCOL'};print "<br><i>Cgi Version=",$ENV{'GATEWAY_INTERFACE'};exit(0);
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?