The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
package MyTest::DBIC::Schema;

use strict;

use base 'DBIx::Class::Schema';

# Load MyTest::DBIC::Schema::*
__PACKAGE__->load_classes(map { ("Simple::$_", "Complex::$_") } 
                          qw(Category Code CodeName Product));

our $DB; # set in bench.pl

1;