NAME

Catalyst::Model::DBI::SQL::Library - SQL::Library DBI Model Class

SYNOPSIS

# use the helper
create model DBI::SQL::Library DBI::SQL::Library dsn user password

# lib/MyApp/Model/DBI/SQL/Library.pm
package MyApp::Model::DBI::SQL::Library;

use base 'Catalyst::Model::DBI::SQL::Library';

__PACKAGE__->config(
	dsn           => 'dbi:Pg:dbname=myapp',
	password      => '',
	user          => 'postgres',
	options       => { AutoCommit => 1 },
);

1;

my $model = $c->model( 'DBI::SQL::Library' );
my $sql = $model->load ( $c, 'sql/something.sql' ) ;

#or my $sql = $model->load ( $c, [ <FH> ] );
#or my $sql = $model->load ( $c, [ $sql_query1, $sql_query2 ] ) )

my $query = $sql->retr ( 'some_sql_query' );

#or my $query = $model->sql->retr ( 'some_sql_query );	

$model->dbh->do ( $query );

#do something else with $sql ...

DESCRIPTION

This is the SQL::Library model class. It provides access to SQL::Library via sql accessor. Please refer to SQL::Library for more information.

METHODS

new

Initializes database connection

$self->load

Initializes SQL::Library instance

$self->dbh

Returns the current database handle.

$self->sql

Returns the current SQL::Library instance

SEE ALSO

Catalyst, DBI

AUTHOR

Alex Pavlovic, alex.pavlovic@taskforce-1.com

COPYRIGHT

This program is free software, you can redistribute it and/or modify it under the same terms as Perl itself.