(Perl)


Этот код работает внутри цикла:

if ( $add_new =~ 'true' )
{
$all_active[$counter_a] = $all_sesion[$counter_s]; #### именно тут ошибка
print '<br>$counter_a - '.$counter_a.'<br>$counter_s - '.$counter_s; #### эта строка ненужна
$counter_a++;
}

$counter_a - по завершению цикла всегда больше 0.
Массив @all_active после цикла пустой...

Кто бы мне сказал, где тут вообще цикл...

Неплохо бы увидеть весь код. Я так думаю, что здесь скорее всего просто не срабатывает условие.

Угу, пожалуй, условие - первое что бросилось в глаза...
Может быть

Код

if ( $add_new =~ /true/ )

или

Код

if ( $add_new eq 'true' )

?

Сравнивать строки при помощи =, != бесполезное дело, на Перле во всяком случае.

2 Halkar:

у него вроде =~

NightGoblin, я в общем сказал. Имелось в виду, что сравнивать строки в Перле при промощи различных равенств - пустое дело. Хотя данный способ проверки в принципе работает, но он не очень надежен.

HalkaR, все зависит от того, что тебе нужно. Иногда не имеет никакого смысла сравнивать по регулярному выражению ($a =~ /foo/), потому что то же самое быстрее и эффективнее можно реализовать буквальным сравнением ($a eq 'foo'). Если например, true читается откуда-то, куда могло быть записано ТОЛЬКО либо 'true' либо 'false', то не имеет никакого смысла тратить время на компиляцию регулярных выражений - лучше сравнить побайтово.

NightGoblin, не спорю