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

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Возврат коретки 
:(
    Опции темы
enRai
Дата 1.12.2010, 19:07 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

Репутация: нет
Всего: нет
Здравствуйте! Как заставить адекватно функционировать такой вот скрипт:
Код

#! /usr/bin/perl -w

print "start\n";

for(0..5) {
    
    print "\rLet: $_";
    sleep(1);
}

print "\ndone\n";


При запуске у меня не выводится каждый шаг, только после 5 секунд последняя строка. Если убрать sleep и увеличить для наглядности количество шагов - то все отлично.
Что я делаю не так? Ощущение что баг какой-то...
PM MAIL   Вверх
ginnie
Дата 1.12.2010, 19:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Комодератор
Сообщений: 1287
Регистрация: 6.1.2008
Где: Москва

Репутация: 38
Всего: 49
Уважаемый enRai!

Надо выключить буферизацию вывода в STDOUT:

Код

$| = 1;



--------------------
Написать код, понятный компьютеру, может каждый, но только хорошие программисты пишут код, понятный людям. (Мартин Фаулер. Рефакторинг)
PM MAIL Skype Jabber   Вверх
enRai
Дата 1.12.2010, 19:28 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

Репутация: нет
Всего: нет
Огромнейшее спасибо! Заработало!
PM MAIL   Вверх
alezzz
Дата 1.12.2010, 19:58 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


сплю...
**


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

Репутация: 1
Всего: 14
не баг, буферизация вывода.

В начале программы поставь $|=1; , должно заработать.


smile тормознул я, пока писал сообщение решил проверить, а тут уже ответили.



Это сообщение отредактировал(а) alezzz - 1.12.2010, 20:03
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Perl"
korob2001
sharq
  • В этом разделе обсуждаются общие вопросы по языку Perl
  • Если ваш вопрос относится к системному программированию, задавайте его здесь
  • Если ваш вопрос относится к CGI программированию, задавайте его здесь
  • Интерпретатор Perl можно скачать здесь ActiveState, O'REILLY, The source for Perl
  • Справочное руководство "Установка perl-модулей", можно скачать здесь

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, korob2001, sharq.
 
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Perl: Общие вопросы | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




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


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

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