Perl CGI radio_group: заполнить значения из запроса БД - PullRequest
Новая
       5

Perl CGI radio_group: заполнить значения из запроса БД

1 голос
/ 05 июля 2010

Я пытаюсь генерировать таблицу, в которой есть радиокнопка в строке, значение которой установлено в поле идентификатора таблицы SQL.Я не уверен, как я могу ссылаться на это значение с помощью CGI radio_group.В моем исследовании radio_group использует ассоциированный массив, однако, если я преобразую SQL-запрос в ассоциативный массив, значения не будут совпадать, поскольку в запросе более двух таблиц.Если возможно, я бы хотел избежать второго вызова SQL: 

use CGI;
use DateTime::Format::MySQL;

$epoch = DateTime->now(time_zone=>"America/New_York");
$fmtnow = DateTime::Format::MySQL->format_datetime($epoch);
$iasql = qq { select * from alert where endtime > '$fmtnow'};
$iaqry = $iadb->prepare($iasql);
$iaqry->execute() || die "Fail $DBI::errstr"
print $query->start_table({-border=>1, -cellpadding =>1});
while(@iarows = $iaqry->fetchrow_array()) {
    print $query->Tr(print $query->td([print $query->radio_group('iaselect',\@iarows[0]),'@iarows[1]','@iarows[2]','@iarows[3]','@iarows[4]','@iarows[5]']));
}
print $query->end_table();

1 Ответ

0 голосов
/ 05 июля 2010

Да, я думаю, что я собираюсь отключить метод радио-кнопки CGI для этой части и просто напечатать его print "<input type="radio">;, он работает таким образом.Я только пытался использовать этот метод, потому что я не понял, есть методы start_div и end_div.До того, как найти те, которые я думал, это был мой единственный способ получить переключатели внутри контейнера q-> div ().

Я исключил часть кода Div, потому что она не показалась подходящей.

...