Суть ::: на локальном сервере все нормально работает - список не наращивается (видно в настройках Apache так сделано.) Тот же скрипт на внешнем хостинге (Zenon) дает наращивание списка при работе.
$file = $path.$country."/clients.dat"; # указание файла на сервере
open(FILE,"$file");
my @list = ;
close(FILE);
# формирование списка на вывод
# my @Special = ""; # Обнуляем список
foreach (@list) {
my ($spec, $id, $name, $txt, $logo, $link) = split(/$delimiter1/);
if ($spec eq "*") { # выбираем строки для массива @Special
push (my @Special, $_);
}
}
#подсчет записей в файле
$count = @Special;
#отладочная песать
print qq!
Число Клиентов = $count
!;
foreach (@Special) {
print qq!
$_ |
!;
}
Результата работы
Число Клиентов = 53
*#0002#3 канал### | *#0005#Cool Air### | *#0007#European Food Group### | *#0008#Home Net Telecom (HNT)### | *#0016#Абсолют Банк### | ..........
Перезагружаем страницу :
Число Клиентов = 106
*#0002#3 канал### | *#0005#Cool Air### | *#0007#European Food Group### | *#0008#Home Net Telecom (HNT)### | *#0016#Абсолют Банк### | *#0020#Агрохимбанк### | *#0512#ИД «Аксель Шпрингер Раша»### |........
и т.д.
поставил (раскоментировал) строку
my @Special = ""; # Обнуляем список
Помогло, список перестал наращиваться, но в начале списка появился нулевой элемент и список увеличился на 1 !!!
Число Клиентов = 54
| *#0002#3 канал### | *#0005#Cool Air### | *#0007#European Food Group### | *#0008#Home Net Telecom (HNT)### | *#0016#Абсолют Банк### | *#0020#Агрохимбанк### |
ВОПРОС :::: Как с этим бороться - что-то изменить в коде или в настройках httpd.conf
Заранее спасибо