LibWeb::Database - A generic database driver for libweb applications
- BSD, Linux, Solaris and Windows.
-
use LibWeb::Database;
my $db = new LibWeb::Database();
my ($sql, $user, $host, $fetch, $result);
$sql = "select USER_NAME, USER_HOST ".
"from USER_TABLE ".
"where USER_LOGIN_STATUS = ".
"LOGIN_INDICATOR";
$fetch = $db->query(
-sql => $sql,
-bind_cols => [\$user, \$host]
);
while ( &$fetch ) {
$result .= "$user $host <BR>\n";
}
$db->done();
print "Content-Type: text/html\n\n";
print "<P> The following users have logged in: $result";
As long as you have the proper DBD installed for your database, you can use
this class to interact with your database in your LibWeb applications.
The current version of LibWeb::Database is available at
http://libweb.sourceforge.net
Several LibWeb applications (LEAPs) have be written, released and are
available at
http://leaps.sourceforge.net
Variables in all-caps (e.g. USER_TABLE) are those variables set through
LibWeb's rc file. Please read LibWeb::Core for more information. Method's parameters in square brackets means
optional.
do()
Params:
-sql =>
Pre:
Post:
query()
Params:
-sql=>, -bind_cols=> [, -want_hash=> ]
Pre:
-
-sql is the sql statement to perform the query,
-
-bind_cols is an ARRAY reference to SCALAR references to fields to be bound in the
table specified in -sql ,
-
-want_hash indicates whether the returning function (a reference) is a reference to
DBI's fetchrow_hashref() or fetchrow_arrayref().
Post:
finish()
Finish a statement execution.
disconnect()
Disconnect the current database session.
done()
Finish a statement execution and disconnect the current database session.
- Colin Kong (colin.kong(at)utoronto.ca)
-
DBI, LibWeb::Core.
|