Сообщения

1

Perl / Вывод [b]Жирным[/b] текста сообщения в линуксовой командной строке

« : 13 Июля 2001, 09:57:44 »

Блин, запарился. Повтор.
...Цитирую:
use Term::ANSIColor qw(:constants);    
print BOLD, BLUE, "This text is in bold blue.
", RESET;[/quote]

2

Perl / Вывод [b]Жирным[/b] текста сообщения в линуксовой командной строке

« : 13 Июля 2001, 09:42:33 »

Ну вот так написал

#!/usr/bin/perl

$a="test";
$b=chr(;
$a=~s/(\\w)/$1$b/g;
print $a;

Вообще ничего не выдает!
А с каких это пор в перле пробелы стали учитываться??[/quote]

Извини, я что-то Linux давно не юзал.
При ближайшем рассмотрении дело выглядит так:
#!/usr/bin/perl
$a="test";
$b=chr(;
$c=$a;
open(FL,"|more");
$c=~s/(\\w)/$1$b$1/g; #Один вид выделения
print FL "$c
";
$c=$a;
$c=~s/(\\w)/_$b$1/g; #Другой вид выделения
print FL "$c
";
close(FL);

more понадобился для того, чтобы все это работало. Без него идет серая картинка. Забыл, вах!
Еще я надыбал в документации про некий специальный модуль для цветного вывода.
Цитирую:
#!/usr/bin/perl
$a="test";
$b=chr(;
$c=$a;
open(FL,"|more");
$c=~s/(\\w)/$1$b$1/g;
print FL "$c
";
$c=$a;
$c=~s/(\\w)/_$b$1/g;
print FL "$c
";
close(FL);
use Term::ANSIColor qw(:constants);     print BOLD, BLUE, "This text is in bold blue.
", RESET;

3

Perl / Вывод [b]Жирным[/b] текста сообщения в линуксовой командной строке

« : 12 Июля 2001, 09:13:53 »

Написал так

#!/usr/bin/perl

$a = "test";
$b = chr( ;
$a = ~ s/(\\w)/$1$b/g;
print $a;

вот что выдает
4294967295
....
даже слово test не пишет, я уж не говрю о жирности... во какая засада[/quote]

--------------------------

Мой вариант: $a=~s/(\\w)/$1$b/g;
Твой вариант: $a = ~ s/(\\w)/$1$b/g;
Почувствуй разницу.
На всякий случай: оператор "=~" пишется без пробела.

4

Perl / Вывод [b]Жирным[/b] текста сообщения в линуксовой командной строке

« : 10 Июля 2001, 09:21:52 »

Угу - символ то вроде 0x8 отвечает за жирность, но это в shell скрипте можно сделать
А как в перле-то, через print добавить жирность? Как включить в выводимой строчку этот 0x8 символ?[/quote]

Так, например:

Код: [Выделить]

$a="abwfjpfgjdopfhgk";
$b=chr(8);
$a=~s/(\\w)/$1$b/g;


5

Perl / Вывод [b]Жирным[/b] текста сообщения в линуксовой командной строке

« : 09 Июля 2001, 09:39:46 »

Если не ошибаюсь, перед каждой буквой ваделяемого слова нужно вставлять 0x8.
Проверить легко: введи из командной строки что-то вроде "man ls > aaa" и посмотри получившийся файл. Там содержатся все необходимые символы, используемые для подсветки man-страниц.