Apache::MVC - Apache front-end to Maypole
package BeerDB; use base 'Apache::MVC'; BeerDB->setup("dbi:mysql:beerdb"); BeerDB->config->{uri_base} = "http://your.site/"; BeerDB->config->{display_tables} = [qw[beer brewery pub style]]; # Now set up your database: # has-a relationships # untaint columns 1;
Maypole is a Perl web application framework to Java's struts. It is essentially completely abstracted, and so doesn't know anything about how to talk to the outside world. Apache::MVC is a mod_perl based subclass of Maypole.
Apache::MVC
To use it, you need to create a package which represents your entire application. In our example above, this is the BeerDB package.
BeerDB
This needs to first inherit from Apache::MVC, and then call setup. This will give your package an Apache-compatible handler subroutine, and then pass any parameters onto the setup_database method of the model class. The default model class for Maypole uses Class::DBI to map a database to classes, but this can be changed by messing with the configuration. (Before calling setup.)
handler
setup_database
Next, you should configure your application through the config method. Configuration parameters at present are:
config
You must specify this; it is the base URI of the application, which will be used to construct links.
If you do not want all of the tables in the database to be accessible, then set this to a list of only the ones you want to display
List output is paged if you set this to a positive number of rows.
You should also set up relationships between your classes, such that, for instance, calling brewery on a BeerDB::Beer object returns an object representing its associated brewery.
brewery
BeerDB::Beer
For a full example, see the included "beer database" application.
Create a driver module like the one above.
Put the following in your Apache config:
<Location /beer> SetHandler perl-script PerlHandler BeerDB </Location>
Copy the templates found in templates/factory into the beer/factory directory off the web root. When the designers get back to you with custom templates, they are to go in beer/custom. If you need to do override templates on a database-table-by-table basis, put the new template in beer/table.
This will automatically give you add, edit, list, view and delete commands; for instance, a list of breweries, go to
add
edit
list
view
delete
http://your.site/beer/brewery/list
For more information about how the system works and how to extend it, see Maypole.
Simon Cozens, simon@cpan.org
simon@cpan.org
You may distribute this code under the same terms as Perl itself.
To install Maypole, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Maypole
CPAN shell
perl -MCPAN -e shell install Maypole
For more information on module installation, please visit the detailed CPAN module installation guide.