输出用户输入(CGI)

Question

我的任务要求我输出从最高到最低的一系列数字，但它必须来自用户输入。我感到困惑的是，我知道如何显示数组，但是，我不确定是否使用for循环正确地启动了我的代码。

赋值使用名为myform.html的myform.html页面和名为myscript.cgi的CGI脚本创建CGI应用程序。HTML页面的表单有两个文本框，用于输入连续整数范围内的上下值。通过选择大约10个不同的值来完成表单。提交表单应该执行myscript.cgi。脚本应该输出一个无序列表，显示从最高到最低范围内的所有整数。

#!c:\Dwimperl\perl\bin\perl.exe

use strict;
use warnings;

use CGI qw(:standard);
use CGI::Carp qw(fatalsToBrowser);
print "Content-type: text/html\n\n";

#read form input from user
my $userinput = <STDIN>;
my $low = param ('lowest');
my $high = param ('highest');


foreach (my $userinput < 100){
print "$low && $high" ;}

Answer 1

替换此代码

foreach (my $userinput < 100){
print "$low && $high" ;}

这样，执行从高数到低数的for循环计数。

print qq{<ul>\n};
for (my $i=$high; $i>= $low; $i--) {
    print qq{    <li>$i</li>\n};
}
print qq{</ul>\n};

Answer 2

就我个人而言，我不喜欢使用C样式循环。我觉得太乱了。

我就是这样写的。

say "\t<li>$_<\li>" for (reverse $low .. $high);

或

print "\t<li>$_<\li>\n" for (reverse $low .. $high);