|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Andrey Sapozhnikov 2:5020/400 29 Mar 2002 02:54:19
To : Alexey Pchelnikov
Subject : Re: вопрос2
--------------------------------------------------------------------------------
"Alexey Pchelnikov" <alex-ptschel@mtu-net.ru> wrote in message
news:a7vs6a$r1l$1@host.talk.ru...
> if ($ref->{'isactive'} eq "active") {$s1="selected"}
> if ($ref->{'isactive'} eq "disable") {$s2="selected"}
...
> print "<option value=2 $s1>Активный</option>";
> print "<option value=1 $s2>Hе используется</option></select></td>";
...
> $s1="";$s2="";
> }
>
> Так вот. Мне постоянно выдаёт perl -w предупреждение, что в одной из этих
> строк (в зависимости от ситуации):
> print "<option value=2 $s1>Активный</option>";
> print "<option value=1 $s2>Hе используется</option></select></td>";
> используется неинициализированное значение. Всё бы ничего, но это
постоянно
> в лог сыпется на сервере и его размеры быстро становятся слишком большими,
> чтобы его можно было скачивать и просматривать.
> Что здесь можно сделать?
Инициализировать значения, разумеется. $s1, к примеру, инициализируется
только
если первое сравнение прошло успешно. Иниче там undef. Логично было бы
переписать выражение так:
my $s1 = $ref->{'isactive'} eq "active" ? "selected" : "";
my $s2 = $ref->{'isactive'} eq "disable" ? "selected" : "";
при этом Вам, к тому же не придется "чистить" значения
в конце цикла. Этого вообще не стоит делать если можно
описать переменную внутри цикла и тем самым ограничить
время ее жизни одной итеррацией.
Андрей
--- ifmail v.2.15dev5
* Origin: Demos online service (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 |
|
|
