+BeerDB->config->{display_tables} = [qw[beer brewery pub style]];
+BeerDB::Brewery->untaint_columns(
+ printable => [qw/name notes url/],
+ #url => [qw/url/]
+);
+BeerDB::Beer->untaint_columns(
+ printable => [qw/abv name price notes/],
+ date =>[ qw/date/],
+);