Вывод пользовательского ввода (CGI)

Question

В моем задании мне предлагается выводить диапазон чисел от наивысшего до самого низкого, но он должен быть от пользовательского ввода. Там, где я в замешательстве, я знаю, как отображать массив, однако я не уверен, что я начинаю свой код с права, используя цикл for.

Назначение Создание приложения CGI с HTML страницы с именем myform.html и скрипт CGI с именем myscript.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" ;} 

При этом, делая для цикла отсчета от большого числа малочисленности

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);