Версия для печати
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум на Исходниках.RU > Perl > Немедленный вывод в stdout


Автор: Gonarh 26.08.10, 20:55
Сабж
<{CODE_COLLAPSE_OFF}><{CODE_WRAP_OFF}>
            for ($index = 0; $index <= $#hs; $index++) {
                    print ($hs[$index]);
                    sleep( 1 );
            }

приведенный цикл сначала полностью отрабатывает, только затем выводится в консоль, а надо чтобы выводилось на каждой итерации. Как сделать?

Автор: Gonarh 26.08.10, 21:12
Разобрался :rolleyes:

Автор: Nadz Goldman 26.08.10, 21:40
Так покажи как -- народу мож тоже интересно =)

Автор: Gonarh 27.08.10, 05:35
<{CODE_COLLAPSE_OFF}><{CODE_WRAP_OFF}>
    print ($hs[$index]."\n");

Автор: Vspeaker 23.10.10, 13:10
Можно и без перевода строки сделать. Достаточно в скрипте установить переменную:
<{CODE_COLLAPSE_OFF}><{CODE_WRAP_OFF}>
    $|=1;
.

Powered by Invision Power Board (https://www.invisionboard.com)
© Invision Power Services (https://www.invisionpower.com)