Free result software for linux

Yahoo::Search::Result is a class representing a single result (single web page, image, video file, etc) from a Yahoo! search-engine query. (This package is included in, and automatically loaded by, the Yahoo::Search package.)

Package Use ^

You never need to use this package directly -- it is loaded automatically by Yahoo::Search.

Object Creation ^

Result objects are created automatically when a Response object is created (when a Request objects Fetch method is called, either directly, or indirectly via a shortcut such as Yahoo::Search->Query().

Class::AbstractLogic is a Perl module to handle Logic Abstractions.

SYNOPSIS

# the logic class definition
package My::Logic::Foo;
use Class::AbstractLogic-base;

# a logic action
action add,
needs [qw(a b)],
verify { a => sub { /^d+$/ }, b => sub { /^d+$/ } },
sub { $_{a} + $_{b} };

1;
...

# logic module manager creation
use Class::AbstractLogic;
my $calm = Class::AbstractLogic::Manager->new;

# loading a logic class
$calm->load_logic(Foo => My::Logic::Foo);

# requesting a result from a logic method
my $result = $calm->logic(Foo)->add(a => 11, b => 12);

# $result will be false if an exception was caught
if ($result) {
print result was . $result->value . "n";
}
else {
print exception raised: . $result->key . "n";
print error message: . $result->error . "n";
}

HTML_QuickForm_LiveText project is custom HTML_QuickForm element implemented as an input text that intercepts key presses to perform a query via AJAX and then shows the result.
When a result line is selected, its value fills the input text and optionally other HTML elements, based on result structure and a map between result component and HTML elements IDs.
Enhancements:
- Result-boxes positions are now "fixed" after the window is loaded.
- This is due to IE, which shows the div at the right of the input text.

Serp EasySurf provides an easy to use extention that makes some modification in search engines result pages.

An easy to use extention that makes some modification in search engines result pages (Google, MSN, Yahoo) and makes surfing in search engines easier!. Features: show numeration, add hotkeys, show results per page select, set|remove omitted results...

An easy to use extention that makes some modification in search engines result pages (Google, MSN, Yahoo) and makes surfing in search engines easier!. Features: show numeration, add hotkeys, show results per page select, set|remove omitted results filter.

Gnome2::VFS is a Perl interface to the 2.x series of the GNOME VFS library.

SYNOPSIS

use Gnome2::VFS;

sub die_already {
my ($action) = @_;
die("An error occured while $action.n");
}

die_already("initializing GNOME VFS") unless (Gnome2::VFS -> init());

my $source = "http://www.perldoc.com/about.html";
my ($result, $handle, $info);

# Open a connection to Perldoc.
($result, $handle) = Gnome2::VFS -> open($source, "read");
die_already("opening connection to $source")
unless ($result eq "ok");

# Get the file information.
($result, $info) = $handle -> get_file_info("default");
die_already("retrieving information about $source")
unless ($result eq "ok");

# Read the content.
my $bytes = $info -> { size };

my $bytes_read = 0;
my $buffer = "";

do {
my ($tmp_buffer, $tmp_bytes_read);

($result, $tmp_bytes_read, $tmp_buffer) =
$handle -> read($bytes - $bytes_read);

$buffer .= $tmp_buffer;
$bytes_read += $tmp_bytes_read;
} while ($result eq "ok" and $bytes_read < $bytes);

die_already("reading $bytes bytes from $source")
unless ($result eq "ok" && $bytes_read == $bytes);

# Close the connection.
$result = $handle -> close();
die_already("closing connection to $source")
unless ($result eq "ok");

# Create and open the target.
my $target = "/tmp/" . $info -> { name };
my $uri = Gnome2::VFS::URI -> new($target);

($result, $handle) = $uri -> create("write", 1, 0644);
die_already("creating $target") unless ($result eq "ok");

# Write to it.
my $bytes_written;

($result, $bytes_written) = $handle -> write($buffer, $bytes);
die_already("writing $bytes bytes to $target")
unless ($result eq "ok" && $bytes_written == $bytes);

# Close the target.
$result = $handle -> close();
die_already("closing $target") unless ($result eq "ok");

Gnome2::VFS -> shutdown();

FrameNet::WordNet::Detour is a WordNet to FrameNet Detour.

SYNOPSIS

use FrameNet::WordNet::Detour;

# Creation without parameters, $WNHOME and $FNHOME will be used
my $detour = FrameNet::WordNet::Detour->new;

# Creation with some parameters
my $detour2 = FrameNet::WordNet::Detour->new(-wnhome => /path/to/WordNet,
-fnhome => /path/to/FrameNet
-cached => 1,
-limited => undef);

my $result = $detour->query("walk#v#1");

if ($result->is_ok) {
print "Best frames: n";
print join( , @{$result->get_best_framenames})."n";

print "All frames: n";
print join( , @{$result->get_all_framenames})."n";

print "All frames with weights: n";
foreach my $frame (@{$result->get_all_frames}) {
print $frame->name.": ";
print $frame->get_weight."n";
}
} else {
print $result->message."n";
}

HPUX::Ioscan is a Perl function to handle HPUX ioscan command.

SYNOPSIS

use HPUX::Ioscan ;
my $result = ioscan ();

print "All hardware paths: ", join(" ", keys %$result),"n";

print "One device file of disk :n",
$result->{2/1.6.0}{device_files}[0],
"n";

This module works on top of the HP-UX command ioscan. It forks a process to run the ioscan command and parses its STDOUT. The result is returned in a hash.

This module is quite basic but it may be interesting if you need to write administration program on HP-UX.

You may call ioscan several time in your program without any problem sicne the result is cached. Only the first call to ioscan will actually run the ioscan command. (But you may override the caching of the result)