table of contents
        
      
      
    | Class::DBI::Test::SQLite(3) | User Contributed Perl Documentation | Class::DBI::Test::SQLite(3) | 
NAME¶
Class::DBI::Test::SQLite - Base class for Class::DBI tests
SYNOPSIS¶
        use base 'Class::DBI::Test::SQLite';
        __PACKAGE__->set_table('test');
        __PACKAGE__->columns(All => qw/id name film salary/);
        sub create_sql { 
                return q{
                        id     INTEGER PRIMARY KEY,
                        name   CHAR(40),
                        film   VARCHAR(255),
                        salary INT
                }
        }
DESCRIPTION¶
This provides a simple base class for Class::DBI tests using SQLite. Each class for the test should inherit from this, provide a create_sql() method which returns a string representing the SQL used to create the table for the class, and then call set_table() to create the table, and tie it to the class.
METHODS¶
set_table¶
        __PACKAGE__->set_table('test');
This combines creating the table with the normal Class::DBI table() call.
create_sql (abstract)¶
        sub create_sql { 
                return q{
                        id     INTEGER PRIMARY KEY,
                        name   CHAR(40),
                        film   VARCHAR(255),
                        salary INT
                }
        }
This should return, as a text string, the schema for the table represented by this class.
| 2011-04-08 | perl v5.42.0 |