Главная страница


ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Alexey Pchelnikov                    2:5020/400     28 Mar 2002  23:52:06
 To : Alexey Pchelnikov
 Subject : вопрос2
 -------------------------------------------------------------------------------- 
 
 Что-то у меня с этими неинициализированными значениями постоянно проблемы.
 Ситуация такая:
  while (my $ref = $sth->fetchrow_hashref()) {
       if ($ref->{'isactive'} eq "active") {$s1="selected"}
       if ($ref->{'isactive'} eq "disable") {$s2="selected"}
       print "<tr><td><textarea
 name=text".$ref->{'msgid'}.">".$ref->{'body'}."</textarea></td><td><select
 name=s".$ref->    {'msgid'}.">";
       print "<option value=2 $s1>Активный</option>";
       print "<option value=1 $s2>Hе используется</option></select></td>";
       print "<td><input type=checkbox name=d".$ref->{'msgid'}."></td></tr>";
       $id = $ref->{'msgid'};
       $s1="";$s2="";
  }
 
 Так вот. Мне постоянно выдаёт perl -w предупреждение, что в одной из этих
 строк (в зависимости от ситуации):
       print "<option value=2 $s1>Активный</option>";
       print "<option value=1 $s2>Hе используется</option></select></td>";
 используется неинициализированное значение. Всё бы ничего, но это постоянно
 в лог сыпется на сервере и его размеры быстро становятся слишком большими,
 чтобы его можно было скачивать и просматривать.
 Что здесь можно сделать?
 --
 WBR, Алексей Пчельников.
 mailto: alex@blackdolphin.ru
 ICQ: 59110395
 Отправлено через сервер Форумы@mail.ru - http://talk.mail.ru
 --- ifmail v.2.15dev5
  * Origin: Talk.Mail.Ru (2:5020/400)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

 Тема:    Автор:    Дата:  
 вопрос   Alexey Pchelnikov   21 Mar 2002 01:59:40 
 Re: вопрос   Andrey Sapozhnikov   21 Mar 2002 02:52:52 
 Re: вопрос   Alexey Pchelnikov   21 Mar 2002 21:24:49 
 Re: вопрос   Vladimir Podgorny   21 Mar 2002 14:26:43 
 Re: вопрос   Alexey Pchelnikov   21 Mar 2002 21:24:50 
 Re: вопрос   Artem Chuprina   21 Mar 2002 18:47:50 
 Re: вопрос   Andrey Sapozhnikov   21 Mar 2002 20:29:14 
 вопрос2   Alexey Pchelnikov   28 Mar 2002 23:52:06 
 вопрос2   Alan Long   29 Mar 2002 01:54:24 
 Re: вопрос2   Andrey Sapozhnikov   29 Mar 2002 02:54:19 
 Re: вопрос2   Alexey Pchelnikov   01 Apr 2002 00:11:16 
 Re: вопрос2   Artem Chuprina   01 Apr 2002 14:02:27 
 Re: вопрос2   Alexey Pchelnikov   01 Apr 2002 23:37:58 
Архивное /ru.perl/648846de9a99.html, оценка 2 из 5, голосов 10
Яндекс.Метрика
Valid HTML 4.01 Transitional