Thread Term:TablePrint: Frage zm Reset von Escapesequenzen (1 answers)
Opened by Kuerbis at 2023-03-25 10:50

Kuerbis
 2023-03-25 10:50
#194756 #194756
User since
2011-03-20
947 Artikel
BenutzerIn
[default_avatar]
Hallo,

das Setzten der Option color bewirkt in CPAN:Term::TablePrint, dass ANSI SGR Escapesequenzen entsprechend interpretiert werden. Dabei werden die Escapesequenzen nach jeder Tabellenreihe zurückgesetzt.
Sollte ich das so lassen oder sollten die Escapesequenzen nach jedem Element/jeder Zelle zurückgesetzt werden.

Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
use Term::TablePrint qw( print_table );
$table_data = [
    [ 'Id', 'Name', 'Num' ],
    [ ' 1', 'aaaaa', 1000 ],
    [ ' 2', 'bbbbb', 1001 ],
    [ ' 3', 'ccccc', 1002 ],
    [ ' 4', 'ddddd', 1003 ],
    [ ' 5', 'eeeee', 1004 ],
    [ ' 6', 'fffff', 1005 ],
    [ ' 7', 'ggggg', 1006 ],
    [ ' 8', 'hhhhh', 1007 ],
    [ ' 9', 'iiiii', 1008 ],
];
$table_data->[3][0] = "\e[32m$table_data->[3][0]";
$table_data->[7] = [ map { "\e[32m$_\e[m" } @{$table_data->[7]} ];
print_table( $table_data, { color => 2 } ); # oder color => 1
[code=perl]

Bei einem Reset nach jedem Element würde es aussehen wie Reihe 7 wobei dann Reihe 3 nicht mehr möglich wäre.

View full thread Term:TablePrint: Frage zm Reset von Escapesequenzen