ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/PApp-SQL/SQL.pm
(Generate patch)

Comparing PApp-SQL/SQL.pm (file contents):
Revision 1.23 by root, Sun Apr 7 16:23:56 2002 UTC vs.
Revision 1.28 by root, Sat Nov 2 03:33:49 2002 UTC

… …
44use DBI (); 44use DBI ();
45 45
46BEGIN { 46BEGIN {
47 use base qw(Exporter DynaLoader); 47 use base qw(Exporter DynaLoader);
48 48
49 $VERSION = 0.13; 49 $VERSION = 0.141;
50 @EXPORT = qw( 50 @EXPORT = qw(
51 sql_exec sql_fetch sql_fetchall sql_exists sql_insertid $sql_exec 51 sql_exec sql_fetch sql_fetchall sql_exists sql_insertid $sql_exec
52 sql_uexec sql_ufetch sql_ufetchall sql_uexists 52 sql_uexec sql_ufetch sql_ufetchall sql_uexists
53 ); 53 );
54 @EXPORT_OK = qw( 54 @EXPORT_OK = qw(
… …
76done by this module. 76done by this module.
77 77
78=item $PApp::SQL::DBH 78=item $PApp::SQL::DBH
79 79
80The default database handle used by this module if no C<$DBH> was 80The default database handle used by this module if no C<$DBH> was
81specified as argument and no C<$DBH> is found in the current package. See 81specified as argument. See C<sql_exec> for a discussion.
82C<sql_exec> for a discussion.
83 82
84=item $PApp::SQL::Database 83=item $PApp::SQL::Database
85 84
86The current default C<PApp::SQL::Database>-object. Future versions might 85The current default C<PApp::SQL::Database>-object. Future versions might
87automatically fall back on this database and create database handles from 86automatically fall back on this database and create database handles from
… …
167with the same dbh and sql-statement twice (e.g. in a subroutine you 166with the same dbh and sql-statement twice (e.g. in a subroutine you
168called), the statement handle for the first call mustn't not be in use 167called), the statement handle for the first call mustn't not be in use
169anymore, as the subsequent call will re-use the handle. 168anymore, as the subsequent call will re-use the handle.
170 169
171The database handle (the first argument) is optional. If it is missing, 170The database handle (the first argument) is optional. If it is missing,
172C<sql_exec> first tries to use the variable C<$DBH> in the current (= 171it tries to use database handle in C<$PApp::SQL::DBH>, which you can set
173calling) package and, if that fails, it tries to use database handle in 172before calling these functions. NOTICE: future and former versions of
174C<$PApp::SQL::DBH>, which you can set before calling these functions. 173PApp::SQL might also look up the global variable C<$DBH> in the callers
174package.
175
176=begin comment
177
178If it is missing, C<sql_exec> first tries to use the variable C<$DBH>
179in the current (= calling) package and, if that fails, it tries to use
180database handle in C<$PApp::SQL::DBH>, which you can set before calling
181these functions.
182
183=end comment
175 184
176The actual return value from the C<$sth->execute> call is stored in the 185The actual return value from the C<$sth->execute> call is stored in the
177package-global (and exported) variable C<$sql_exec>. 186package-global (and exported) variable C<$sql_exec>.
178 187
179If any error occurs C<sql_exec> will throw an exception. 188If any error occurs C<sql_exec> will throw an exception.
… …
309 318
310=item [old-size] = cachesize [new-size] 319=item [old-size] = cachesize [new-size]
311 320
312Returns (and possibly changes) the LRU cache size used by C<sql_exec>. The 321Returns (and possibly changes) the LRU cache size used by C<sql_exec>. The
313default is somewhere around 50 (= the 50 last recently used statements 322default is somewhere around 50 (= the 50 last recently used statements
314will be cached). It shouldn't be too large, since a simple linear listed 323will be cached). It shouldn't be too large, since a simple linear list
315is used for the cache at the moment (which, for small (<100) cache sizes 324is used for the cache at the moment (which, for small (<100) cache sizes
316is actually quite fast). 325is actually quite fast).
317 326
318The function always returns the cache size in effect I<before> the call, 327The function always returns the cache size in effect I<before> the call,
319so, to nuke the cache (for example, when a database connection has died 328so, to nuke the cache (for example, when a database connection has died
… …
407 416
408Return the login name. 417Return the login name.
409 418
410=item $db->password 419=item $db->password
411 420
412Return the password (emphasizing the fact that the apssword is stored plaintext ;) 421Return the password (emphasizing the fact that the password is stored plaintext ;)
413 422
414=cut 423=cut
415 424
416sub dsn($) { 425sub dsn($) {
417 my $self = shift; 426 my $self = shift;

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines