Term::TablePrint - Print a table to the terminal and browse it interactively.
Version 0.136
my $table = [ [ 'id', 'name' ], [ 1, 'Ruth' ], [ 2, 'John' ], [ 3, 'Mark' ], [ 4, 'Nena' ], ]; use Term::TablePrint qw( print_table ); print_table( $table ); # or OO style: use Term::TablePrint; my $pt = Term::TablePrint->new(); $pt->print_table( $table );
print_table shows a table and lets the user interactively browse it. It provides a cursor which highlights the row on which it is located. The user can scroll through the table with the different cursor keys - see "KEYS".
print_table
If the table has more rows than the terminal, the table is divided up on as many pages as needed automatically. If the cursor reaches the end of a page, the next page is shown automatically until the last page is reached. Also if the cursor reaches the topmost line, the previous page is shown automatically if it is not already the first one.
If the terminal is too narrow to print the table, the columns are adjusted to the available width automatically.
If the option "table_expand" is enabled and a row is selected with Return, each column of that row is output in its own line preceded by the column name. This might be useful if the columns were cut due to the too low terminal width.
Return
The following modifications are made (at a copy of the original data) to the table elements before the output.
Tab characters (\t) are replaces with a space.
\t
Vertical spaces (\v) are squashed to two spaces
\v
Control characters, code points of the surrogate ranges and non-characters are removed.
If the option squash_spaces is enabled leading and trailing spaces are removed from the array elements and spaces are squashed to a single space.
If an element looks like a number it is left-justified, else it is right-justified.
The new method returns a Term::TablePrint object. As an argument it can be passed a reference to a hash which holds the options - the available options are listed in "OPTIONS".
new
Term::TablePrint
my $tp = Term::TablePrint->new( [ \%options ] );
The print_table method prints the table passed with the first argument.
$tp->print_table( $array_ref, [ \%options ] );
The first argument is a reference to an array of arrays. The first array of these arrays holds the column names. The following arrays are the table rows where the elements are the field values.
As a second and optional argument a hash reference can be passed which holds the options - the available options are listed in "OPTIONS".
The print_table subroutine prints the table passed with the first argument.
print_table( $array_ref, [ \%options ] );
The subroutine print_table takes the same arguments as the method "print_table".
Keys to move around:
the ArrowDown key (or the j key) to move down and the ArrowUp key (or the k key) to move up.
ArrowDown
j
ArrowUp
k
the PageUp key (or Ctrl-B) to go back one page, the PageDown key (or Ctrl-F) to go forward one page.
PageUp
Ctrl-B
PageDown
Ctrl-F
the Insert key to go back 10 pages, the Delete key to go forward 10 pages (20 instead of 10 pages if the page count is greater than 10_000).
Insert
Delete
the Home key (or Ctrl-A) to jump to the first row of the table, the End key (or Ctrl-E) to jump to the last row of the table.
Home
Ctrl-A
End
Ctrl-E
If table_expand is set to 0, the Return key closes the table if the cursor is on the first row.
0
If table_expand is enabled and the cursor is on the first row, pressing Return three times in succession closes the table. If the cursor is auto-jumped to the first row, it is required only one Return to close the table.
If the cursor is not on the first row:
with the option table_expand disabled the cursor jumps to the table head if Return is pressed.
with the option table_expand enabled each column of the selected row is output in its own line preceded by the column name if Return is pressed. Another Return closes this output and goes back to the table output. If a row is selected twice in succession, the pointer jumps to the first row.
If the size of the window has changed, the screen is rewritten as soon as the user presses a key.
The F3 key opens a prompt. A regular expression is expected as input. This enables one to only display rows where at least one column matches the entered pattern. See option "f3".
F3
String displayed above the table.
If binary_filter is set to 1, "BNRY" is printed instead of arbitrary binary data.
If the data matches the repexp /[\x00-\x08\x0B-\x0C\x0E-\x1F]/, it is considered arbitrary binary data.
/[\x00-\x08\x0B-\x0C\x0E-\x1F]/
Printing arbitrary binary data could break the output.
Default: 0
Set the decimal separator. Numbers with a decimal separator are formatted as number if this option is set to the right value.
Allowed values: a character with a print width of 1. If an invalid values is passed, decimal_separator falls back to the default value.
1
Default: . (dot)
This option has only meaning if the operating system is MSWin32.
If the OS is MSWin32, Win32::Console::ANSI is used. By default Win32::Console::ANSI converts the characters from Windows code page to DOS code page (the so-called ANSI to OEM conversion). This conversation is disabled by default in Term::Choose but one can enable it by setting this option.
Win32::Console::ANSI
Term::Choose
Setting this option to 1 enables the codepage mapping offered by Win32::Console::ANSI.
0 - disable automatic codepage mapping
1 - keep automatic codepage mapping
Setting color to 1 enables the support for color and text formatting escape sequences except for the current selected element. If set to 2, also for the current selected element the color support is enabled (inverted colors).
2
Set the behavior of the F3 key.
0 - off
1 - case-insensitive search
2 - case-sensitive search
Default: 1
If squash_spaces is enabled, consecutive spaces are squashed to one space and leading and trailing spaces are removed.
Set the maximum number of used table rows. The used table rows are kept in memory.
To disable the automatic limit set max_rows to 0.
If the number of table rows is equal to or higher than max_rows, the last row of the output tells that the limit has been reached.
Default: 200_000
The columns with a width below or equal min_col_width are only trimmed if it is still required to lower the row width despite all columns wider than min_col_width have been trimmed to min_col_width.
Default: 30
Set the mouse mode (see option mouse in "OPTIONS" in Term::Choose).
mouse
Set the progress bar threshold. If the number of fields (rows x columns) is higher than the threshold, a progress bar is shown while preparing the data for the output.
Default: 40_000
Set the number of spaces between columns.
Default: 2
If the option table_expand is enabled and Return is pressed, the selected table row is printed with each column in its own line. Exception: if the cursor auto-jumped to the first row, the first row will not be expanded.
If table_expand is set to 0, the cursor jumps to the to first row (if not already there) when Return is pressed.
1 - on
If set (string), table_name is added in the bottom line.
Set the string that will be shown on the screen instead of an undefined field.
Default: "" (empty string)
print_table dies
if an invalid number of arguments is passed.
if an invalid argument is passed.
if an unknown option name is passed.
if an invalid option value is passed.
Requires Perl version 5.8.3 or greater.
print_table expects decoded strings.
For a correct output it is required to set an encoding layer for STDOUT matching the terminal's character set.
STDOUT
It is required a terminal that uses a monospaced font which supports the printed characters.
You can find documentation for this module with the perldoc command.
perldoc Term::TablePrint
App::DBBrowser
Thanks to the Perl-Community.de and the people form stackoverflow for the help.
Matthäus Kiem <cuer2s@gmail.com>
Copyright 2013-2021 Matthäus Kiem.
This library is free software; you can redistribute it and/or modify it under the same terms as Perl 5.10.0. For details, see the full text of the licenses in the file LICENSE.
To install Term::TablePrint, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Term::TablePrint
CPAN shell
perl -MCPAN -e shell install Term::TablePrint
For more information on module installation, please visit the detailed CPAN module installation guide.