|
|
ru.cgi.perl- RU.CGI.PERL ------------------------------------------------------------------ From : Victor Wagner 2:5020/400 29 Nov 2002 11:06:53 To : Sergey Nepsha Subject : Re: DBI script -------------------------------------------------------------------------------- Sergey Nepsha <Sergey.Nepsha@f82.n5083.z2.fidonet.org> wrote: SN> Почему не работает следующий код ? Ввожу данные, они с виду обрабатываются а SN> в базе их нету. SN> #!/usr/bin/perl -w SN> #use strict; SN> use CGI qw(:standard); SN> use DBI; SN> print header(), SN> start_html(-title => "To-Do List", SN> -bgcolor => "white"), SN> h2("Список Заданий"); SN> my $choice = lc(param("choice")); #вот тут есть lc но почему то параметр из SN> форм#ы не приводится к нижнему регистру!? Потому что use locale не стоит. Без use locale у тебя русский тест обрабатываться не будет. Правда, для того чтобы выставить русскую локаль в CGI-скрипте, тебе скорее всего потребуется самостоятельно setlocale звать. Поэтому я бы на твоем месте сделал submit(-name=>'SEND', -value=> "Отправить") и проверял бы на существование непустого параметра SEND. А при необходимости сделать другое действие тем же скриптом - подсовывал бы кнопку с другим именем. SN> SN> if ($content ne "") { SN> $dbh = connectdb(); SN> $dbh->do(qq{ SN> INSERT INTO todo SET t = NOW(), SN> status = 'не выполнено', content = ? SN> }, undef, $content); Это какая такая база данных такое понимает? Вроде бы в SQL бывает update table set t=NOW() where something=? и insert into todo(t,status,content) values (now(),'не выполнено',?) -- Говорят, живет на свете Дональд Кнут. Доктор Кнут, поверьте, дети, страшно крут. И неважно что он пишет не о том, Главное, чтоб все же вышел пятый том. --- ifmail v.2.15dev5 * Origin: Free Net of Leninsky,45 (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.cgi.perl/15178ebad7e2d.html, оценка из 5, голосов 10
|