result
Sponsored Links
Sponsored Links
Secleted [ 0 ] software to compare
Results 1 - 15 of about 2032
Yahoo::Search::Result 1.5.8
Yahoo::Search::Result is a class representing a single result from a Yahoo! search-engine query. more>>
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().
<<lessPackage 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().
Download (0.034MB)
Added: 2006-07-20 License: Perl Artistic License Price:
1194 downloads
WWW::Google::Images::SearchResult 0.6.4
WWW::Google::Images::SearchResult is a Perl module that can search result object for WWW::Google::Images. more>>
WWW::Google::Images::SearchResult is a Perl module that can search result object for WWW::Google::Images.
Other methods
$result->save_all(%args)
Save all the image files and web pages from result.
Optional parameters:
content => 1
Content is saved by calling $image->save_content() for each result.
context => 1
Context is saved by calling $image->save_context() for each result.
summary => 1
A summary is created, that links saved files to original URLs.
file => $file
Passed to $image->save_content() and $image->save_context().
dir => $directory
Passed to $image->save_content() and $image->save_context().
base => $base
Passed to $image->save_content() and $image->save_context().
Additionaly, if optional parameter file or base is given, an index number is automatically appended.
<<lessOther methods
$result->save_all(%args)
Save all the image files and web pages from result.
Optional parameters:
content => 1
Content is saved by calling $image->save_content() for each result.
context => 1
Context is saved by calling $image->save_context() for each result.
summary => 1
A summary is created, that links saved files to original URLs.
file => $file
Passed to $image->save_content() and $image->save_context().
dir => $directory
Passed to $image->save_content() and $image->save_context().
base => $base
Passed to $image->save_content() and $image->save_context().
Additionaly, if optional parameter file or base is given, an index number is automatically appended.
Download (0.007MB)
Added: 2006-11-27 License: Perl Artistic License Price:
1063 downloads
EasySQL 0.0.1
EasySQL is a meta-SQL-language for MySQL. more>>
EasySQL is a front-end that provides a slightly extended version of the MySQL SQL syntax allowing for far more sophisticated tasks to be accomplished without resorting to using an external language such as Perl.
Main features:
- Iterate across a SQL result set, and execute multiple queries using the values from each result row.
- Connect to multiple data sources and issue individual queries against one or more data sources.
<<lessMain features:
- Iterate across a SQL result set, and execute multiple queries using the values from each result row.
- Connect to multiple data sources and issue individual queries against one or more data sources.
Download (0.004MB)
Added: 2005-04-14 License: GPL (GNU General Public License) Price:
1653 downloads
Resistor Color Code Calculator 1.0
Resistor Color Code Calculator calculates the value of a resistor (an electronic component). more>>
Resistor Color Code Calculator project calculates the value of a resistor (an electronic component).
The colors on the resistor are input into the program, and the result displays the resistance value of the resistor.
This is much easier than memorizing rhymes to remember colors.
<<lessThe colors on the resistor are input into the program, and the result displays the resistance value of the resistor.
This is much easier than memorizing rhymes to remember colors.
Download (0.87MB)
Added: 2006-06-09 License: Free for non-commercial use Price:
1256 downloads
Chess::Elo 0.02
Chess::Elo is a Perl module to calculate Chess Elo ratings. more>>
Chess::Elo is a Perl module to calculate Chess "Elo" ratings.
SYNOPSIS
use Chess::Elo qw(:all);
# Alice is going to thump Bob...
my ($alice_elo, $bob_elo) = (2100, 1200);
# Oh no, Alice lost to Bob!
my $result = 0; # 0.5 for draw, 1 for win
my @new_elo_alice_bob = elo ($alice, 0, $bob);
use Data::Dumper; warn Dumper(@new_elo_alice_bob);
[
2068.17894295388, # My, Alice took a hit on her rating :)
1231.82105704612 # Bob is setting pretty
];
This module provides a single function, elo which allows one to calculate individual ratings based on performance. Typically, a player is given an initial provisional rating of 1600 points. In all cases, one gains and loses points as a function of the playing strength of both parties and the result of their encounter.
The formula used is the same one used at magi-nation:
http://www.magi-nation.com/Tournaments/ratingsfaq.htm
Or, quantitatively speaking:
A2 = A1 + 32 ( G - ( 1 / ( 1 + 10 ** ( ( B1 -A1) / 400 ) ) ) )
A2 is Alices post-game rating
A1 is Alice rating before the game against Bob
B1 is Bobs rating before the game against Alice
G is the game result, in this case:
1, if A beats B
0, if A loses to B
0.5, if A draws to B
METHODS
($new_a, $new_b) = elo($elo_a, $result, $elo_b)
This function takes 3 arguments describing the result of a person with rating $elo_a competing with the person with rating $elo_b. The result argument is from the perspective of person A. Thus if A won $result is 1. If A lost, $result is 0. If A drew, $result is 0.5.
EXPORT
None by default, elo upon request.
<<lessSYNOPSIS
use Chess::Elo qw(:all);
# Alice is going to thump Bob...
my ($alice_elo, $bob_elo) = (2100, 1200);
# Oh no, Alice lost to Bob!
my $result = 0; # 0.5 for draw, 1 for win
my @new_elo_alice_bob = elo ($alice, 0, $bob);
use Data::Dumper; warn Dumper(@new_elo_alice_bob);
[
2068.17894295388, # My, Alice took a hit on her rating :)
1231.82105704612 # Bob is setting pretty
];
This module provides a single function, elo which allows one to calculate individual ratings based on performance. Typically, a player is given an initial provisional rating of 1600 points. In all cases, one gains and loses points as a function of the playing strength of both parties and the result of their encounter.
The formula used is the same one used at magi-nation:
http://www.magi-nation.com/Tournaments/ratingsfaq.htm
Or, quantitatively speaking:
A2 = A1 + 32 ( G - ( 1 / ( 1 + 10 ** ( ( B1 -A1) / 400 ) ) ) )
A2 is Alices post-game rating
A1 is Alice rating before the game against Bob
B1 is Bobs rating before the game against Alice
G is the game result, in this case:
1, if A beats B
0, if A loses to B
0.5, if A draws to B
METHODS
($new_a, $new_b) = elo($elo_a, $result, $elo_b)
This function takes 3 arguments describing the result of a person with rating $elo_a competing with the person with rating $elo_b. The result argument is from the perspective of person A. Thus if A won $result is 1. If A lost, $result is 0. If A drew, $result is 0.5.
EXPORT
None by default, elo upon request.
Download (0.004MB)
Added: 2007-01-04 License: Perl Artistic License Price:
1025 downloads
Test::Litmus 0.03
Test::Litmus is a Perl module to submit test results to the Litmus testcase management tool. more>>
Test::Litmus is a Perl module to submit test results to the Litmus testcase management tool.
SYNOPSIS
use Test::Litmus;
$t = Test::Litmus->new(-machinename => mycomputer,
-username => user,
-authtoken => token,
# optional # -server => http://litmus.mozilla.org/process_test.cgi,
# optional # -action => submit);
$t->sysconfig(-product => Firefox,
-platform => Windows,
-opsys => Windows XP,
-branch => Trunk,
-buildid => 2006061314,
-buildtype => debug cvs,
-locale => en-US);
my $result = Test::Litmus::Result->new(
-isAutomatedResult => 1, # optional
-testid => 27,
-resultstatus => pass, # valid results are pass
# or fail
-exitstatus => 0,
-duration => 666,
-timestamp => 20051111150944, # optional (default: current time)
-comment => optional comment here, # optional
-bugnumber => 300010, # optional
-log => [Test::Litmus::Log->new( # optional
-type => STDOUT,
-data => foobar),
Test::Litmus::Log->new(
-type => Extensions Installed,
-data => log information here)]
);
$t->addResult($result);
# $t->addResult($someOtherResult);
# etc...
# add log information that should be linked with
# all results (i.e. env variables, config info)
$t->addLog(Test::Litmus::Log->new(
-type => STDOUT,
-data => log data));
my $res = $t->submit();
# $res is 0 for non-fatal errors (some results were submitted), and
# undef for fatal errors (no results were submitted successfully)
if ($t->errstr()) { die $t->errstr() }
<<lessSYNOPSIS
use Test::Litmus;
$t = Test::Litmus->new(-machinename => mycomputer,
-username => user,
-authtoken => token,
# optional # -server => http://litmus.mozilla.org/process_test.cgi,
# optional # -action => submit);
$t->sysconfig(-product => Firefox,
-platform => Windows,
-opsys => Windows XP,
-branch => Trunk,
-buildid => 2006061314,
-buildtype => debug cvs,
-locale => en-US);
my $result = Test::Litmus::Result->new(
-isAutomatedResult => 1, # optional
-testid => 27,
-resultstatus => pass, # valid results are pass
# or fail
-exitstatus => 0,
-duration => 666,
-timestamp => 20051111150944, # optional (default: current time)
-comment => optional comment here, # optional
-bugnumber => 300010, # optional
-log => [Test::Litmus::Log->new( # optional
-type => STDOUT,
-data => foobar),
Test::Litmus::Log->new(
-type => Extensions Installed,
-data => log information here)]
);
$t->addResult($result);
# $t->addResult($someOtherResult);
# etc...
# add log information that should be linked with
# all results (i.e. env variables, config info)
$t->addLog(Test::Litmus::Log->new(
-type => STDOUT,
-data => log data));
my $res = $t->submit();
# $res is 0 for non-fatal errors (some results were submitted), and
# undef for fatal errors (no results were submitted successfully)
if ($t->errstr()) { die $t->errstr() }
Download (0.004MB)
Added: 2007-05-04 License: Perl Artistic License Price:
903 downloads
Nerdy-Lines 0.1.6
Nerdy theme is based on the Kreski Lines icon theme. more>>
Nerdy Lines theme is based on the Kreski Lines icon theme. The main problem was that the original theme was not scalable. And also incomplete.
That gave my desktop an incomplete look. So I decided to fix that. The result is that they were redrawn from scratch in SVG-format.
Installation:
Untar archive to ~/.icons
-or-
drag and drop to the gnome theme manager and it will automatically install
Enhancements:
- Getting my desktop icons done (part III)
<<lessThat gave my desktop an incomplete look. So I decided to fix that. The result is that they were redrawn from scratch in SVG-format.
Installation:
Untar archive to ~/.icons
-or-
drag and drop to the gnome theme manager and it will automatically install
Enhancements:
- Getting my desktop icons done (part III)
Download (0.39MB)
Added: 2005-11-17 License: GPL (GNU General Public License) Price:
1438 downloads
roll 1.1.2
roll command-line based program rolls a user-defined dice sequence and displays the result. more>>
roll command-line based program rolls a user-defined dice sequence and displays the result. The dices to roll are defined using dN where N is the number of sides.
Dices can be rolled multiple times by prepending the number of repetitions (e.g., 3d6) and used in simple mathematical expressions (e.g., 2d8+4).
Enhancements:
- A bug in the 1d% percentile dices (values over 100 were possible) has been fixed.
<<lessDices can be rolled multiple times by prepending the number of repetitions (e.g., 3d6) and used in simple mathematical expressions (e.g., 2d8+4).
Enhancements:
- A bug in the 1d% percentile dices (values over 100 were possible) has been fixed.
Download (0.10MB)
Added: 2007-03-21 License: GPL (GNU General Public License) Price:
948 downloads
Serp EasySurf 1.1.4
Serp EasySurf provides an easy to use extention that makes some modification in search engines result pages. more>>
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.
<<lessAn 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.
Download (0.012MB)
Added: 2007-04-04 License: MPL (Mozilla Public License) Price:
945 downloads
Torrent Bubbles 0.1
Torrent Bubbles is an easy-to-use BitTorrent utility program which can search for torrents on the Web. more>>
Torrent Bubbles is an easy-to-use BitTorrent utility program which can search for torrents on the Web.
The main goal of Torrent Bubbles is simplicity, with only a search bar, two buttons, and the ability to double click a search result (to launch a download).
<<lessThe main goal of Torrent Bubbles is simplicity, with only a search bar, two buttons, and the ability to double click a search result (to launch a download).
Download (0.58MB)
Added: 2005-06-29 License: GPL (GNU General Public License) Price:
1586 downloads
RPC::pClient 0.1005
RPC::pClient is a Perl extension for writing pRPC clients. more>>
RPC::pClient is a Perl extension for writing pRPC clients.
SYNOPSIS
use RPC::pClient;
$sock = IO::Socket::INET->new(PeerAddr => joes.host.de,
PeerPort => 2570,
Proto => tcp);
$connection = new RPC::pClient(sock => $sock,
application => My App,
version => 1.0,
user => joe,
password => hello!);
pRPC (Perl RPC) is a package that simplifies the writing of Perl based client/server applications. RPC::pServer is the package used on the server side, and you guess what RPC::pClient is for. See RPC::pClient(3) for this part.
pRPC works by defining a set of of functions that may be executed by the client. For example, the server might offer a function "multiply" to the client. Now a function call
@result = $con->Call(multiply, $a, $b);
on the client will be mapped to a corresponding call
multiply($con, $data, $a, $b);
on the server. (See the funcTable description below for $data.) The function calls result will be returned to the client and stored in the array @result. Simple, eh?
Client methods
new
The client constructor. Returns a client object or an error string, thus you typically use it like this:
$client = RPC::pClient->new ( ... );
if (!ref($client)) {
print STDERR "Error while creating client object: $clientn";
} else {
# Do real stuff
...
}
Call
calls a function on the server; the arguments are a function name, followed by function arguments. It returns the function results, if successfull. After executing Call() you should always check the error attribute: An empty string indicates success. Thus the equivalent to
$c = Add($a, $b)
# Use $c
...
is
$c = $client->Call("Add", $a, $b);
if ($client->error) {
# Do something in case of error
...
} else {
# Use $c
...
}
CallInt
Similar to and internally used by Call. Receives the same arguments, but the result is prepended by a status value: If this status value is TRUE, then all went fine and the following result array is valid. Otherwise an error occurred and the error message follows immediately after the status code. Example:
my($status, @result) = $client->CallInt("Add", $a, $b);
if (!$status) {
# Do something in case of error
my $errmsg = shift @result || "Unknown error";
...
} else {
...
}
Encrypt
This method can be used to get or set the cipher attribute, thus the encryption mode. If the method is passed an argument, the argument will be used as the new encryption mode. (undef for no encryption.) In either case the current encryption mode will be returned. Example:
# Get the current encryption mode
$mode = $server->Encrypt();
# Currently disable encryption
$server->Encrypt(undef);
# Switch back to the old mode
$server->Encrypt($mode);
<<lessSYNOPSIS
use RPC::pClient;
$sock = IO::Socket::INET->new(PeerAddr => joes.host.de,
PeerPort => 2570,
Proto => tcp);
$connection = new RPC::pClient(sock => $sock,
application => My App,
version => 1.0,
user => joe,
password => hello!);
pRPC (Perl RPC) is a package that simplifies the writing of Perl based client/server applications. RPC::pServer is the package used on the server side, and you guess what RPC::pClient is for. See RPC::pClient(3) for this part.
pRPC works by defining a set of of functions that may be executed by the client. For example, the server might offer a function "multiply" to the client. Now a function call
@result = $con->Call(multiply, $a, $b);
on the client will be mapped to a corresponding call
multiply($con, $data, $a, $b);
on the server. (See the funcTable description below for $data.) The function calls result will be returned to the client and stored in the array @result. Simple, eh?
Client methods
new
The client constructor. Returns a client object or an error string, thus you typically use it like this:
$client = RPC::pClient->new ( ... );
if (!ref($client)) {
print STDERR "Error while creating client object: $clientn";
} else {
# Do real stuff
...
}
Call
calls a function on the server; the arguments are a function name, followed by function arguments. It returns the function results, if successfull. After executing Call() you should always check the error attribute: An empty string indicates success. Thus the equivalent to
$c = Add($a, $b)
# Use $c
...
is
$c = $client->Call("Add", $a, $b);
if ($client->error) {
# Do something in case of error
...
} else {
# Use $c
...
}
CallInt
Similar to and internally used by Call. Receives the same arguments, but the result is prepended by a status value: If this status value is TRUE, then all went fine and the following result array is valid. Otherwise an error occurred and the error message follows immediately after the status code. Example:
my($status, @result) = $client->CallInt("Add", $a, $b);
if (!$status) {
# Do something in case of error
my $errmsg = shift @result || "Unknown error";
...
} else {
...
}
Encrypt
This method can be used to get or set the cipher attribute, thus the encryption mode. If the method is passed an argument, the argument will be used as the new encryption mode. (undef for no encryption.) In either case the current encryption mode will be returned. Example:
# Get the current encryption mode
$mode = $server->Encrypt();
# Currently disable encryption
$server->Encrypt(undef);
# Switch back to the old mode
$server->Encrypt($mode);
Download (0.019MB)
Added: 2007-07-24 License: Perl Artistic License Price:
823 downloads
NetMath 0.1
NetMath project is a web browser which allows Web pages to contain modifiable calculations. more>>
NetMath project is a web browser which allows Web pages to contain modifiable calculations.
It has built-in plotting engines and the ability to communicate with computation servers.
This makes it possible to do local graphics, zooming and panning, while taking advantage of sophisticated computational programs.
Documents contain active and editable items, and the results of computations appear in the document.
Main features:
- :expand((x+y+z)^5) gives Result.
- factor(f) (the value f above is maintained) evaluates to Result.
- 500! produces Result
- factor(154784717804734665298299) produces a list of factors and multiplicities Result
<<lessIt has built-in plotting engines and the ability to communicate with computation servers.
This makes it possible to do local graphics, zooming and panning, while taking advantage of sophisticated computational programs.
Documents contain active and editable items, and the results of computations appear in the document.
Main features:
- :expand((x+y+z)^5) gives Result.
- factor(f) (the value f above is maintained) evaluates to Result.
- 500! produces Result
- factor(154784717804734665298299) produces a list of factors and multiplicities Result
Download (0.35MB)
Added: 2006-10-31 License: GPL (GNU General Public License) Price:
1088 downloads
nfcount 0.4
nfcount is tool for count network traffic by using rules. more>>
nfcount is tool for count network traffic by using rules. Rule can be defined by source or destenation IP address, timeranges. Accounting result may be simple counter or hystogram.
Main features:
- In rule definition file You can use variables for addresses and timeranges.
- Many rules can update one counter/hystogram.
- Many formats of data file: argus files, IP Accounting text.
- Many formats of output result (perl, binary).
- In rule You can use list of addresses/networks.
- State files for incremental counting.
Installation:
./configure
make
make install
<<lessMain features:
- In rule definition file You can use variables for addresses and timeranges.
- Many rules can update one counter/hystogram.
- Many formats of data file: argus files, IP Accounting text.
- Many formats of output result (perl, binary).
- In rule You can use list of addresses/networks.
- State files for incremental counting.
Installation:
./configure
make
make install
Download (0.30MB)
Added: 2005-10-19 License: BSD License Price:
1468 downloads
SQL::Interpolate 0.33
SQL::Interpolate is a Perl module to interpolate Perl variables into SQL statements. more>>
SQL::Interpolate is a Perl module to interpolate Perl variables into SQL statements.
SYNOPSIS
use SQL::Interpolate qw(:all);
# Some sample data to interpolate:
my $s = blue; my @v = (5, 6);
# Variable references are transformed into bind parameters.
# The most basic usage involves scalarrefs (as well as arrayrefs
# preceeded by "IN").
my ($sql, @bind) = sql_interp
SELECT * FROM table WHERE x = , $s, AND y IN, @v;
# RESULT:
# $sql = SELECT * FROM mytable WHERE x = ? AND y IN (?, ?)
# @bind = ($s, @v);
# In certain contexts, an arrayref or hashref acts as a single tuple:
my ($sql, @bind) = sql_interp
INSERT INTO table, {x => $s, y => 1};
# RESULT:
# $sql = INSERT INTO mytable (x, y) VALUES(?, ?);
# @bind = ($s, 1);
my ($sql, @bind) = sql_interp
UPDATE table SET, {x => $s, y => 1}, WHERE y , 2;
# RESULT:
# $sql = UPDATE mytable SET x = ?, y = ? WHERE y ?;
# @bind = ($s, 1, 2);
# In general, a hashref provides a shortcut for specifying
# a logical-AND construction:
my ($sql, @bind) = sql_interp
SELECT * FROM table WHERE, {x => $s, y => @v};
# RESULT:
# $sql = SELECT * FROM mytable WHERE (x = ? AND y IN (?, ?));
# @bind = ($s, @v);
# In general, an arrayref acts as a result set or reference to
# a temporary table:
my ($sql, @bind) = sql_interp
[[1, 2], [4, 5]], UNION, [{x => 2, y => 3}, {x => 5, y => 6};
# RESULT:
# $sql = (SELECT ?, ? UNION ALL SELECT ?, ?) UNION
# (SELECT ? AS x, ? AS y UNION ALL SELECT ?, ?);
# @bind = (1,2,4,5, 2,3,5,6);
my ($sql, @bind) = sql_interp
SELECT * FROM, [[1, 2], [4, 5]]
# RESULT:
# $sql = SELECT * FROM (SELECT ?, ? UNION ALL SELECT ?, ?) AS tbl0;
# @bind = (1,2,4,5);
# Each result above is suitable for passing to DBI:
my $res = $dbh->selectall_arrayref($sql, undef, @bind);
# Besides these simple techniques shown, SQL-Interpolate includes
# various optional modules to further integrate SQL::Interpolate with
# DBI and streamline the syntax with source filtering and macros (see
# the L section):
use DBIx::Interpolate FILTER => 1;
...
my $rows = $dbx->selectall_arrayref(sql[
SELECT thid, date, title, subject
FROM threads
WHERE date > $x AND subject IN @subjects
]);
<<lessSYNOPSIS
use SQL::Interpolate qw(:all);
# Some sample data to interpolate:
my $s = blue; my @v = (5, 6);
# Variable references are transformed into bind parameters.
# The most basic usage involves scalarrefs (as well as arrayrefs
# preceeded by "IN").
my ($sql, @bind) = sql_interp
SELECT * FROM table WHERE x = , $s, AND y IN, @v;
# RESULT:
# $sql = SELECT * FROM mytable WHERE x = ? AND y IN (?, ?)
# @bind = ($s, @v);
# In certain contexts, an arrayref or hashref acts as a single tuple:
my ($sql, @bind) = sql_interp
INSERT INTO table, {x => $s, y => 1};
# RESULT:
# $sql = INSERT INTO mytable (x, y) VALUES(?, ?);
# @bind = ($s, 1);
my ($sql, @bind) = sql_interp
UPDATE table SET, {x => $s, y => 1}, WHERE y , 2;
# RESULT:
# $sql = UPDATE mytable SET x = ?, y = ? WHERE y ?;
# @bind = ($s, 1, 2);
# In general, a hashref provides a shortcut for specifying
# a logical-AND construction:
my ($sql, @bind) = sql_interp
SELECT * FROM table WHERE, {x => $s, y => @v};
# RESULT:
# $sql = SELECT * FROM mytable WHERE (x = ? AND y IN (?, ?));
# @bind = ($s, @v);
# In general, an arrayref acts as a result set or reference to
# a temporary table:
my ($sql, @bind) = sql_interp
[[1, 2], [4, 5]], UNION, [{x => 2, y => 3}, {x => 5, y => 6};
# RESULT:
# $sql = (SELECT ?, ? UNION ALL SELECT ?, ?) UNION
# (SELECT ? AS x, ? AS y UNION ALL SELECT ?, ?);
# @bind = (1,2,4,5, 2,3,5,6);
my ($sql, @bind) = sql_interp
SELECT * FROM, [[1, 2], [4, 5]]
# RESULT:
# $sql = SELECT * FROM (SELECT ?, ? UNION ALL SELECT ?, ?) AS tbl0;
# @bind = (1,2,4,5);
# Each result above is suitable for passing to DBI:
my $res = $dbh->selectall_arrayref($sql, undef, @bind);
# Besides these simple techniques shown, SQL-Interpolate includes
# various optional modules to further integrate SQL::Interpolate with
# DBI and streamline the syntax with source filtering and macros (see
# the L section):
use DBIx::Interpolate FILTER => 1;
...
my $rows = $dbx->selectall_arrayref(sql[
SELECT thid, date, title, subject
FROM threads
WHERE date > $x AND subject IN @subjects
]);
Download (0.056MB)
Added: 2007-04-05 License: Perl Artistic License Price:
933 downloads
Blatte 0.9.4
Blatte is a Perl module with text macro/markup/template language. more>>
Blatte is a Perl module with text macro/markup/template language.
SYNOPSIS
use Blatte;
use Blatte::Builtins;
my $perl = &Blatte::Parse(...some Blatte program ...);
if (defined($perl)) {
my $result = eval $perl;
if (defined($result)) {
&Blatte::traverse($result, &callback);
} elsif ($@) {
...handle execution error...
}
} else {
...handle parsing error...
}
Blatte is a very powerful text markup and transformation language with a very simple syntax. A Blatte document can be translated into a Perl program that, when executed, produces a transformed version of the input document.
This module itself contains some utility functions for handling Blatte documents, described below in the FUNCTIONS section. However, writers of Blatte-based software will generally be more interested in other associated modules. See in particular Blatte::Compiler (for processing files full of Blatte code) and Blatte::Builtins (for a description of the Blatte languages intrinsic functions).
Most casual end users will probably be interested in Blattes ability to serve as a higher-level language for writing web pages. This requires the additional CPAN package Blatte::HTML.
Most of the remainder of this document describes the syntax and semantics of the Blatte language.
<<lessSYNOPSIS
use Blatte;
use Blatte::Builtins;
my $perl = &Blatte::Parse(...some Blatte program ...);
if (defined($perl)) {
my $result = eval $perl;
if (defined($result)) {
&Blatte::traverse($result, &callback);
} elsif ($@) {
...handle execution error...
}
} else {
...handle parsing error...
}
Blatte is a very powerful text markup and transformation language with a very simple syntax. A Blatte document can be translated into a Perl program that, when executed, produces a transformed version of the input document.
This module itself contains some utility functions for handling Blatte documents, described below in the FUNCTIONS section. However, writers of Blatte-based software will generally be more interested in other associated modules. See in particular Blatte::Compiler (for processing files full of Blatte code) and Blatte::Builtins (for a description of the Blatte languages intrinsic functions).
Most casual end users will probably be interested in Blattes ability to serve as a higher-level language for writing web pages. This requires the additional CPAN package Blatte::HTML.
Most of the remainder of this document describes the syntax and semantics of the Blatte language.
Download (0.031MB)
Added: 2007-05-14 License: GPL (GNU General Public License) Price:
893 downloads
Secleted [ 0 ] software to compare
Copyright Notice:
Software piracy is theft, Using crack, password, serial numbers, registration codes, key generators is illegal and prevent future software development. The above result search only lists software in full, demo and trial versions for free download. Download links are directly from our mirror sites or publisher sites, torrent files or links from rapidshare.com, yousendit.com or megaupload.com are not allowed