cgi.pl

来自「用perl语言编写的CGI webserver页面」· PL 代码 · 共 20 行

PL
20
字号
require "cgi_perl/html.pl";$Title = "Get From";$QueryString = $ENV{'QUERY_STRING'};@NameValuePairs = split{/&/, $QueryString};&HTML_Header($Title);print "<BODY>\n";print "<H1>$Title</H1>\n";print "<HR>\n";foreach $NameValue(@NameValuePairs){    ($Name, $Value) = split(/=/, $NameValue);    print "Name = $Name, Value = $Value<BR>\n";    }&HTML_Footer;

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?