]> git.decadent.org.uk Git - maypole.git/blob - ex/fancy_example/BeerDB/Beer.pm
Beginning to a fancy example app of 2.11 features . See
[maypole.git] / ex / fancy_example / BeerDB / Beer.pm
1 package BeerDB::Beer;
2 use strict;
3 use warnings;
4
5 # do this to test we get the expected @ISA after setup_model()
6 use base 'BeerDB::Base';
7
8 sub fooey : Exported {}
9
10 1;