Select Code to Download

package MySchema::Sneaky;

use base qw/DBIx::Class/;
...
__PACKAGE__->add_columns(
    qw/ foo bar /
);

package MySchema;
...
#die Dumper $sqlt_schema;

}