man > Class::DBI::Test::SQLite(3pm)

📛 NAME

Class::DBI::Test::SQLite - Base class for Class::DBI tests

🚀 Quick Reference

📖 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.

perl v5.32.0 2020-12-28 Class::DBI::Test::SQLite(3pm)