URL: https://www.opennet.me/cgi-bin/openforum/vsluhboard.cgi
Форум: vsluhforumID9
Нить номер: 2100
[ Назад ]

Исходное сообщение
"требуется нарисовать в консоли таблицу на perl"

Отправлено MTHawk , 22-Сен-03 23:16 
Доброго времени суток. Проблема:требуется нарисовать в консоли таблицу на perl и периодически обновлять ее содержимое. По сути вся проблема сводится к  тому что бы вернуть курсор в начало таблицы (скажем на 18 строк вверх). Но по спецификациям perl нашел только код \r - возврат коретки. Существует ли код "обратный перевод строки" или альтернативные пути решения проблемы.
Заранее благодарен.
Max "The Hawk" Litvinov

Содержание

Сообщения в этом обсуждении
"требуется нарисовать в консоли таблицу на perl"
Отправлено etz , 23-Сен-03 10:57 
>Доброго времени суток. Проблема:требуется нарисовать в консоли таблицу на perl и периодически
>обновлять ее содержимое. По сути вся проблема сводится к  тому
>что бы вернуть курсор в начало таблицы (скажем на 18 строк
>вверх). Но по спецификациям perl нашел только код \r - возврат
>коретки. Существует ли код "обратный перевод строки" или альтернативные пути решения
>проблемы.
>Заранее благодарен.
>Max "The Hawk" Litvinov


clear


"требуется нарисовать в консоли таблицу на perl"
Отправлено bug0r , 23-Сен-03 11:26 
>
>
>clear

замаешься ( глаза бы пожалел )


"требуется нарисовать в консоли таблицу на perl"
Отправлено aka50 , 23-Сен-03 16:32 
>Доброго времени суток. Проблема:требуется нарисовать в консоли таблицу на perl и периодически
>обновлять ее содержимое. По сути вся проблема сводится к  тому
>что бы вернуть курсор в начало таблицы (скажем на 18 строк
>вверх). Но по спецификациям perl нашел только код \r - возврат
>коретки. Существует ли код "обратный перевод строки" или альтернативные пути решения
>проблемы.
>Заранее благодарен.
>Max "The Hawk" Litvinov

я бы сделал через ncurses... из перла бы по pipe читал бы обновления и на screen бы их пулял... можно даже цветами подкрашивать :)


"требуется нарисовать в консоли таблицу на perl"
Отправлено aka50 , 23-Сен-03 16:34 
>>Доброго времени суток. Проблема:требуется нарисовать в консоли таблицу на perl и периодически
>>обновлять ее содержимое. По сути вся проблема сводится к  тому
>>что бы вернуть курсор в начало таблицы (скажем на 18 строк
>>вверх). Но по спецификациям perl нашел только код \r - возврат
>>коретки. Существует ли код "обратный перевод строки" или альтернативные пути решения
>>проблемы.
>>Заранее благодарен.
>>Max "The Hawk" Litvinov
>
>я бы сделал через ncurses... из перла бы по pipe читал бы
>обновления и на screen бы их пулял... можно даже цветами подкрашивать
>:)
или можно попробывать через p5-curses...( это во FreeBSD порт такой) но я не пробывал ни разу... только на С под ncurses девелопил


"требуется нарисовать в консоли таблицу на perl"
Отправлено ovax , 29-Сен-03 04:25 
Господи, читаю такое и удивляюсь - на сколько всётаки прогресс в области средств разработки отучает людей думать головой :))
Сразу видно, что не работал человек на старой технике, где всякие графики и таблицы приходлось распечатывать на АЦПУ :))))


Просто рисуй свою таблицу в массиве (в памяти), а затем тупо распечатывай полученый результат.



"требуется нарисовать в консоли таблицу на perl"
Отправлено DerinI , 29-Сен-03 13:14 
>Господи, читаю такое и удивляюсь - на сколько всётаки прогресс в области
>средств разработки отучает людей думать головой :))
>Сразу видно, что не работал человек на старой технике, где всякие графики
>и таблицы приходлось распечатывать на АЦПУ :))))
>
>
>Просто рисуй свою таблицу в массиве (в памяти), а затем тупо распечатывай
>полученый результат.

   А куда выводить надо?

   Вообще то есть такой Perl модулек P5-Data-ShowTable, так вот он именно для этого



"требуется нарисовать в консоли таблицу на perl"
Отправлено MTHawk , 06-Окт-03 12:49 
>Господи, читаю такое и удивляюсь - на сколько всётаки прогресс в области
>средств разработки отучает людей думать головой :))
>Сразу видно, что не работал человек на старой технике, где всякие графики
>и таблицы приходлось распечатывать на АЦПУ :))))
>
>
>Просто рисуй свою таблицу в массиве (в памяти), а затем тупо распечатывай
>полученый результат.


да я бы с радостью.... только он будет рисовать таблицу не на том же месте где была старая (это же консоль) а нарисует под ней..... а прога должна давать удобный мониторинг, который все время перед глазами. одновременно на экране должна быть только одна табоица, а не ее предидущие рейнкарнации


"требуется нарисовать в консоли таблицу на perl"
Отправлено devnull , 18-Окт-03 07:22 

>>
>>Просто рисуй свою таблицу в массиве (в памяти), а затем тупо распечатывай
>>полученый результат.
>
>
>да я бы с радостью.... только он будет рисовать таблицу не на
>том же месте где была старая (это же консоль) а нарисует
>под ней..... а прога должна давать удобный мониторинг, который все время
>перед глазами. одновременно на экране должна быть только одна табоица, а
>не ее предидущие рейнкарнации

товарищь ovax правильно заметил - создаешь табличку заново и пихаешь в /dev/ttyX или как там его /dev/vc??
оно все перетрет, старого не останется