Thread Term:TablePrint: Frage zm Reset von Escapesequenzen
(1 answers)
Opened by Kuerbis at 2023-03-25 10:50
Hallo,
das Setzten der Option color bewirkt in ![]() 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. |