Help for this page

Select Code to Download


  1. or download this
    use File::Basename;
use lib dirname(__FILE__);
#use BeerDB;
1;
__END__
  2. or download this
            # This is a rough test to see whether or not we're a template 
+or
        # a static page
        return -1 unless @{ $r->{objects} || [] };