Модераторы: korob2001, ginnie
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> странная работа программы 
:(
    Опции темы
Гость_Roman
  Дата 16.1.2004, 10:46 (ссылка)    |    (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered











здравствуйте,

работаю в UNIX. вот кусок кода, поведение которого мне не понятно :

$counter = 0;
foreach $f (@file_names)
{
undef $state;

foreach $d (@dir_names)
{
if ($f =~ /$d/)
{
$counter++;
print "$counter\n";

$state = 1;
last;
}
}

if (!defined $state)
{
print fh_tmp $f;
}
}

программа сравнивает записи в двух разных файлах
и пишет разницу в fh_tmp.все вроде верно ,но происходит это так : сначала печатаются значения $counter, затем вывод заканчивается и начинает в час по чайной ложке заполнятся
fh_tmp. очень, очень медленно. Why !??


  Вверх
Бекетов Роман aka Yaiu
Дата 16.1.2004, 17:46 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 13
Регистрация: 14.1.2004

Репутация: нет
Всего: 1



Сформулируйте задачу точнее от начала и до конца

PM MAIL   Вверх
NightGoblin
Дата 18.1.2004, 07:44 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Участник Клуба
Сообщений: 1021
Регистрация: 24.11.2002
Где: 127.0.0.1

Репутация: нет
Всего: 11



На будущее: можно ли Вас попросить писать в тегах [code] с отступами?

Теперь ближе к делу. Где находится файл, на который ссылается дескриптор fh_tmp?


--------------------
Kernel panic: /dev/null overflow!
GCS/IT/MU/O d-@ s: a- C++$>++++$ ULSB(+++) P+++ L+++>++++ !E W++(-) N o? K w-- O? M>+ V? PS+ PE Y+ PGP+>+++ t- 5 X+ R- !tv b+ DI+ D+ G e++ h--- r++ y?
B4F1 54B6 8738 26CD 5125 0581 B923 9273 FE59 1981
PM MAIL WWW ICQ   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Perl"
korob2001
sharq
  • В этом разделе обсуждаются общие вопросы по языку Perl
  • Если ваш вопрос относится к системному программированию, задавайте его здесь
  • Если ваш вопрос относится к CGI программированию, задавайте его здесь
  • Интерпретатор Perl можно скачать здесь ActiveState, O'REILLY, The source for Perl
  • Справочное руководство "Установка perl-модулей", можно скачать здесь


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, korob2001, sharq.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Perl: Общие вопросы | Следующая тема »


 




[ Время генерации скрипта: 0.0382 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.