Free terms software for linux

Term::ShellUI is a fully-featured shell-like command line environment.

SYNOPSIS

use Term::ShellUI;
my $term = new Term::ShellUI(
commands => {
"cd" => {
desc => "Change to directory DIR",
maxargs => 1, args => sub { shift->complete_onlydirs(@_); },
proc => sub { chdir($_[0] || $ENV{HOME} || $ENV{LOGDIR}); },
},
"pwd" => {
desc => "Print the current working directory",
maxargs => 0, proc => sub { system(pwd); },
},
"quit" => {
desc => "Quit using Fileman", maxargs => 0,
method => sub { shift->exit_requested(1); },
}},
history_file => ~/.gdbui-synopsis-history,
);
print Using .$term->{term}->ReadLine."n";
$term->run();

Term::ShellUI uses the history and autocompletion features of Term::ReadLine to present a sophisticated command-line interface to the user. It tries to make every feature that one would expect to see in a fully interactive shell trivial to implement. You simply declare your command set and let ShellUI take care of the heavy lifting.
This module was previously called Term::GDBUI.

Term::ANSIMenu is an infrastructure for creating menus in ANSI capable terminals.

SYNOPSIS

use Term::ANSIMenu;
my $menu = Term::ANSIMenu->new(
width => 40,
help => [[, &standard_help],
[hint 1, &help_item],
[ undef, &standard_help],
[hint 3, undef]
],
title => title,
items => [[1, First menu item, &exec_item],
[2, This string is just too long
to fit in a normal terminal
and thus it will be clipped.],
[3, , sub { system "man man" }]
],
status => status,
prompt => prompt: );

$menu->print_menu();
while (my $key = $menu->read_key()) {
last unless defined $menu->do_key($key);
$menu->update_status() if $key eq S;
$menu->update_status(New status) if $key eq s;
$menu->update_prompt() if $key eq P;
$menu->update_prompt(New prompt: ) if $key eq p;
}
$menu->pos($menu->line_after_menu() + 1, 1);

I wrote this mainly to make live easy on those staff members to whom I delegate tasks. Most of them prefer to use a menu instead of having to type complicated commands. To them its a faster and safer way of working (we all know about typos dont we...).

By using this module you can create menus with only a few lines of code and still have a shipload of features. Need context-sensitive help or a statusbar? Like to use hotkeys? Want flashy colors and styles? Its all there. Just fill in the attributes and youre good to go.

Term::ANSIColor is a color screen output using ANSI escape sequences.

SYNOPSIS

use Term::ANSIColor;
print color bold blue;
print "This text is bold blue.n";
print color reset;
print "This text is normal.n";
print colored ("Yellow on magenta.n", yellow on_magenta);
print "This text is normal.n";
print colored [yellow on_magenta], "Yellow on magenta.n";

use Term::ANSIColor qw(uncolor);
print uncolor 01;31, "n";

use Term::ANSIColor qw(:constants);
print BOLD, BLUE, "This text is in bold blue.n", RESET;

use Term::ANSIColor qw(:constants);
$Term::ANSIColor::AUTORESET = 1;
print BOLD BLUE "This text is in bold blue.n";
print "This text is normal.n";

This module has two interfaces, one through color() and colored() and the other through constants. It also offers the utility function uncolor(), which has to be explicitly imported to be used (see SYNOPSIS).

color() takes any number of strings as arguments and considers them to be space-separated lists of attributes. It then forms and returns the escape sequence to set those attributes. It doesnt print it out, just returns it, so youll have to print it yourself if you want to (this is so that you can save it as a string, pass it to something else, send it to a file handle, or do anything else with it that you might care to).
uncolor() performs the opposite translation, turning escape sequences into a list of strings.

The recognized attributes (all of which should be fairly intuitive) are clear, reset, dark, bold, underline, underscore, blink, reverse, concealed, black, red, green, yellow, blue, magenta, on_black, on_red, on_green, on_yellow, on_blue, on_magenta, on_cyan, and on_white. Case is not significant. Underline and underscore are equivalent, as are clear and reset, so use whichever is the most intuitive to you. The color alone sets the foreground color, and on_color sets the background color.
Note that not all attributes are supported by all terminal types, and some terminals may not support any of these sequences. Dark, blink, and concealed in particular are frequently not implemented.

Attributes, once set, last until they are unset (by sending the attribute "reset"). Be careful to do this, or otherwise your attribute will last after your script is done running, and people get very annoyed at having their prompt and typing changed to weird colors.

As an aid to help with this, colored() takes a scalar as the first argument and any number of attribute strings as the second argument and returns the scalar wrapped in escape codes so that the attributes will be set as requested before the string and reset to normal after the string. Alternately, you can pass a reference to an array as the first argument, and then the contents of that array will be taken as attributes and color codes and the remainder of the arguments as text to colorize.

Normally, colored() just puts attribute codes at the beginning and end of the string, but if you set $Term::ANSIColor::EACHLINE to some string, that string will be considered the line delimiter and the attribute will be set at the beginning of each line of the passed string and reset at the end of each line. This is often desirable if the output is being sent to a program like a pager that can be confused by attributes that span lines. Normally youll want to set $Term::ANSIColor::EACHLINE to "n" to use this feature.

Term::ANSIScreen is a Perl module for terminal control using ANSI escape sequences.

SYNOPSIS

# qw/:color/ is exported by default, i.e. color() & colored()

use Term::ANSIScreen qw/:color :cursor :screen :keyboard/;

print setmode(1), setkey(a,b);
print "40x25 mode now, with a mapped to b.";
; resetkey; setmode 3; cls;

locate 1, 1; print "@ This is (1,1)", savepos;
print locate(24,60), "@ This is (24,60)"; loadpos;
print down(2), clline, "@ This is (3,15)n";

setscroll 1, 20;

color black on white; clline;
print "This line is black on white.n";
print color reset; print "This text is normal.n";

print colored ("This text is bold blue.n", bold blue);
print "This text is normal.n";
print colored [bold blue], "This text is bold blue.n";
print "This text is normal.n";

use Term::ANSIScreen qw/:constants/; # constants mode
print BLUE ON GREEN . "Blue on green.n";

$Term::ANSIScreen::AUTORESET = 1;
print BOLD GREEN . ON_BLUE "Bold green on blue.", CLEAR;
print "nThis text is normal.n";

# Win32::Console emulation mode
# this returns a Win32::Console object on a Win32 platform
my $console = Term::ANSIScreen->new;
$console->Cls; # also works on non-Win32 platform

Term::ANSIScreen is a superset of Term::ANSIColor (as of version 1.04 of that module). In addition to color-sequence generating subroutines exported by :color and :constants, this module also features :cursor for cursor positioning, :screen for screen control, as well as :keyboard for key mapping.

NOTES

All subroutines in Term::ANSIScreen will print its return value if called under a void context.

The cursor position, current color, screen mode and keyboard mappings affected by Term::ANSIScreen will last after the program terminates. You might want to reset them before the end of your program.

Term::Prompt is a Perl extension for prompting a user for information.

SYNOPSIS

use Term::Prompt;
$value = &prompt(...);

use Term::Prompt qw(termwrap);
print &termwrap(...);

$Term::Prompt::MULTILINE_INDENT = ;

PREREQUISITES

You must have Text::Wrap and Term::ReadKey available on your system.

This main function of this module is to accept interactive input. You specify the type of inputs allowed, a prompt, help text and defaults and it will deal with the user interface, (and the user!), by displaying the prompt, showing the default, and checking to be sure that the response is one of the legal choices. Additional "types" that could be added would be a phone type, a social security type, a generic numeric pattern type...

Term::Animation is a Perl module that provides a framework to produce sprite animations using ASCII art. Each ASCII sprite is given one or more frames, and placed into the animation as an animation entity.

An animation entity can have a callback routine that controls the position and frame of the entity. The module can also do collision detection between entities.

INSTALLATION

To install this module type the following:

perl Makefile.PL
make
make test
make install

SENTENSA Knowledge Miner is a platform independent tool for searching any text.
SENTENSA uses robust methods of indexing and searching text, leveraging experience from more than 20 years of information retrieval.
SENTENSA products offer advanced text retrieval solutions for large databases that will make your searches for key information fast and effective. You can index on one platform and query on another.
Main features:
- Fast indexing
- Probabilistic Search
- Similarity Search
- Strong Terms
- Indexed Terms
- Relevance Rankings
- Rapid Searching in huge amounts of information
- Spider including conversion from PDF and HTML to XML
Enhancements:
- An SQL filter that supports MySQL was added.