| Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате |
| Форум программистов > Perl: Общие вопросы > странная работа программы |
| Автор: Гость_Roman 16.1.2004, 10:46 |
| здравствуйте, работаю в 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 |
| Сформулируйте задачу точнее от начала и до конца |
| Автор: NightGoblin 18.1.2004, 07:44 |
| На будущее: можно ли Вас попросить писать в тегах [code] с отступами? Теперь ближе к делу. Где находится файл, на который ссылается дескриптор fh_tmp? |