Term::Pager - Page through text, a screenful at a time, like more or less
use Term::Pager; my $t = Term::Pager->new( rows => 25, cols => 80 ); $t->add_text( $text ); $t->more();
This is a module for paging through text one screenful at a time. It supports the features you expect, including backwards movement and searching. It uses the keys you expect.
Create the Pager
$t = Term::Pager->new( option => value, ... );
If no options are specified, sensible default values will be used. The following options are recognized:
The number of rows on your terminal. This defaults to 25.
The number of columns on your terminal. This defaults to 80.
The speed (baud rate) of your terminal. Will default to a sensible value.
You will need some text to page through. You can specify text as as a parameter to the constructor:
text => $text
Or add text later:
$t->add_text( $text );
This code uses termcap. If the termcap entry for your ancient esoteric terminal is wrong or incomplete, this module may either fill your screen with unintelligible gibberish, or drop back to a feature-free mode.
Term::Cap, termcap(5), more(1), less(1) Yellowstone National Park
Jeff Weisberg - http://www.tcp4me.com