Я довольно новичок в Perl, и мне было поручено редактировать массивный скрипт / сайт Perl, чтобы включить две новые функции.Это в основном сводится к загрузке и скачиванию файлов, но после поиска в Интернете я не нашел никаких полезных руководств, которые использовали бы Perl в качестве веб-страницы.У меня есть опыт работы с HTML и PHP, но я не уверен, насколько хорошо это переводится на Perl.
В настоящее время обе задачи имеют свои собственные ссылки / веб-страницы, которые я могу создавать с нуля, и это хорошо.
Первая задача заключается в том, что мне дали скрипт, который запускается вследующим образом:
script.sh [data1] [data2] [data3]
, который генерирует файл, который мне нужно отправить пользователю для загрузки.data1 и 2 могут быть простым текстом, в то время как на веб-странице мне нужно, чтобы data3 сообщал true или false в виде флажка.Мой код для этого до сих пор представляет собой HTML-таблицу с обязательными полями и кнопкой отправки, но в настоящее время она на самом деле ничего не делает:
my $table = HTML::Table->new(-class=>'dev4',-align=>'center');
my $data1 = textfield(-name=>'data1',-size=>50,-maxlength=>50);
my $data2 = textfield(-name=>'data2',-size=>5,-maxlength=>5);
my $data3 = checkbox(-name=>'',-value=>'true');
my $submit = submit(-name=>"generate",-value=>"Generate file");
$table->addRow(h4("Data 1 text").$data1);
$table->addRow(h4("Data 2 num").$data2);
$table->addRow(h4("Check if true").$data3);
$table->addRow($submit);
return $table;
Как мне отправить данные 1, 2 и 3 накомандной строки (используя обратные кавычки, я полагаю?), а затем пользователь должен загрузить сгенерированный файл?
Вторая задача - пользователь может загрузить файл (тот же файл, что и выше), а затем скриптработает так:
script.sh [filename]
, который сообщает, что файл отформатирован правильно или неправильно.Как создать кнопку для загрузки файла, а затем сообщить пользователю, если файл правильный или нет?
Любая помощь или ссылки на турориалы / примеры будут высоко оценены, спасибо!