);
BeerDB::Beer->untaint_columns(
printable => [qw/abv name price notes/],
);
BeerDB::Beer->untaint_columns(
printable => [qw/abv name price notes/],
date =>[ qw/date/],
);
use Class::DBI::Loader::Relationship;
BeerDB->config->{loader}->relationship($_) for (
"a brewery produces beers",
date =>[ qw/date/],
);
use Class::DBI::Loader::Relationship;
BeerDB->config->{loader}->relationship($_) for (
"a brewery produces beers",