Download

Quick search

Rate this software

• Currently 0/5 Stars.
• 1
• 2
• 3
• 4
• 5

No. Votes

0

Linux

Windows

Mac

Mobile

Drivers

Scripts - DHTML

Web Developer Blog

Scripts and Applications

SQL YASP

Details

SQL::YASP is a SQL parser and evaluator.
SYNOPSIS
use SQL::YASP;
my ($sql, $stmt, $dbrec, $params);
$sql = <<'(SQL)';
select
-- supports single and multi-line comments
-- supports "as fieldname" format for select clauses
first ||| last as fullname
from members
where
/
over 100 built in SQL functions and operators
including most MySQL functions and operators
/
ucase(first) ilike 'Joe' and
-- Perl-like regular expressions
first =~ m/ (Joe) | (Steve) /ix and
-- handles quoted strings and escapes in quotes
last = 'O''Sullivan' and
-- any level of nested parens
-- full support for placeholders
((rank >= ?) and (rank <= ?))
(SQL)
get statement object
$stmt = SQL::YASP::Statement->new($sql);
database record: populate this hash from your database
$dbrec =
{
first=>'Joe',
last=>'Smith',
email=>'joe@idocs.com',
rank=>10,
};
input parameters
$params = [10, 20];
test if this record passes the where clause
if ($stmt->{'where'}->evalexpr(db_record=>$dbrec, params=>$params)) {
get the record as indicated by the select clause
my $retrec = $stmt->select_fields(db_record=>$dbrec);
print $retrec->{'fullname'}, "n";
}
Requirements:
· Perl

0 comments

Add to

 Del.icio.us   Digg It   Furl   YahooMyWeb   Blinklist

SQL YASP Version History

Related Software