package Catalyst::Model::CDBI::Plain; use strict; our $VERSION = '0.03'; use base qw[Class::DBI Catalyst::Base]; sub new { my ( $class, $c ) = @_; return Catalyst::Base->new( $class, $c ); } 1;