Новые ответы

Цвет при выводе на консоль,

Dr. Nebula, 13-Янв-04, 15:54 [смотреть все]

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

Ответить | Сообщить модератору

Цвет при выводе на консоль, XMan, 16:47 , 13-Янв-04 (1)
Незнаю, может в перле есть модуль, аля ncurses. А может и сам ncurses. Но в основах это делается через ESC-последовательности. Посмотри "man console_codes".
Ответить | Сообщить модератору

Цвет при выводе на консоль, ChiP, 21:48 , 13-Янв-04 (2)
>Незнаю, может в перле есть модуль, аля ncurses. А может и сам
>ncurses. Но в основах это делается через ESC-последовательности. Посмотри "man console_codes".
>
<-< chip@void >-< chip >->$ uname -rs
FreeBSD 4.8-RELEASE
<-< chip@void >-< chip >->$ man console_codes
No manual entry for console_codes
<-< chip@void >-< chip >->$
:)
А вопрошавшему:
my %COLORS = (
  'blue'   =>  "\033[34;01m",  # blue
  'green'  =>  "\033[32;01m",  # green
  'cyan'   =>  "\033[36;01m",  # cyan
  'red'    =>  "\033[31;01m",  # red
  'yellow' =>  "\033[33;01m",  # yellow
  'end'    =>  "\033[0m"       # `end`
);
далее
print $COLORS{'green'}, "Hello, World", $COLORS{'end'};
за остальными ESC-последовательностями лезь в мануал, который указал XMan
Ответить | Сообщить модератору

Цвет при выводе на консоль, XMan, 00:00 , 14-Янв-04 (3)
УГу. Может не быть мана, говоришь...
Ну тогда google.com на предмет console_codes спасет отца русской демократии :)
Ответить | Сообщить модератору
Цвет при выводе на консоль, Dr. Nebula, 09:56 , 14-Янв-04 (4)
>>Незнаю, может в перле есть модуль, аля ncurses. А может и сам
>>ncurses. Но в основах это делается через ESC-последовательности. Посмотри "man console_codes".
>>
><-< chip@void >-< chip >->$ uname -rs
>FreeBSD 4.8-RELEASE
><-< chip@void >-< chip >->$ man console_codes
>No manual entry for console_codes
><-< chip@void >-< chip >->$
>
>:)
>
>А вопрошавшему:
>my %COLORS = (
>  'blue'   =>  "\033[34;01m",  # blue
>  'green'  =>  "\033[32;01m",  # green
>  'cyan'   =>  "\033[36;01m",  # cyan
>  'red'    =>  "\033[31;01m",  # red
>  'yellow' =>  "\033[33;01m",  # yellow
>  'end'    =>  "\033[0m"       # `end`
>);
>
>далее
>print $COLORS{'green'}, "Hello, World", $COLORS{'end'};
>
>за остальными ESC-последовательностями лезь в мануал, который указал XMan
О! Очень похоже на то что я когда то видел! :) Тенькс
Ответить | Сообщить модератору
Цвет при выводе на консоль, Murr, 16:11 , 14-Янв-04 (5)
>А вопрошавшему:
>my %COLORS = (
>  'blue'   =>  "\033[34;01m",  # blue
>  'green'  =>  "\033[32;01m",  # green
>  'cyan'   =>  "\033[36;01m",  # cyan
>  'red'    =>  "\033[31;01m",  # red
>  'yellow' =>  "\033[33;01m",  # yellow
>  'end'    =>  "\033[0m"       # `end`
>);
>
>далее
>print $COLORS{'green'}, "Hello, World", $COLORS{'end'};
>
>за остальными ESC-последовательностями лезь в мануал, который указал XMan

Зачем советовать такие вещи? Терминалы не исчерпываются ANSI терминалами.
Смотреть надо в сторону curses.
Ответить | Сообщить модератору

Цвет при выводе на консоль, ChiP, 00:14 , 15-Янв-04 (6)
>>А вопрошавшему:
>>my %COLORS = (
>>  'blue'   =>  "\033[34;01m",  # blue
>>  'green'  =>  "\033[32;01m",  # green
>>  'cyan'   =>  "\033[36;01m",  # cyan
>>  'red'    =>  "\033[31;01m",  # red
>>  'yellow' =>  "\033[33;01m",  # yellow
>>  'end'    =>  "\033[0m"       # `end`
>>);
>>
>>далее
>>print $COLORS{'green'}, "Hello, World", $COLORS{'end'};
>>
>>за остальными ESC-последовательностями лезь в мануал, который указал XMan
>
>
>Зачем советовать такие вещи? Терминалы не исчерпываются ANSI терминалами.
>Смотреть надо в сторону curses.
Для начала данных последовательностей, имхо, вполне достаточно. Часто ли встречаются не ANSI терминалы ?
А для curses уже давно существуют биндинги:
p5-Curses
p5-Curses-Application
p5-Curses-Forms
p5-Curses-Widgets
но начинать с них, имхо, не разумно.
Ответить | Сообщить модератору