lib/Maypole/Application.pm

   1 package Maypole::Application;
   2
   3 use strict;
   4 use warnings;
   5
   6 if ( $ENV{MOD_PERL} ) {
   7     require mod_perl;
   8     if ( $mod_perl::VERSION >= 1.99 ) {
   9         require Apache2::MVC;
  10         our @ISA = qw(Apache2::MVC);
  11     }
  12     else {
  13         require Apache::MVC;
  14         our @ISA = qw(Apache::MVC);
  15     }
  16 }
  17 else {
  18     require CGI::Maypole;
  19     our @ISA = qw(CGI::Maypole);
  20 }
  21
  22 1;
  23
  24 =head1 NAME
  25
  26 Maypole::Application - all in wonder front-end
  27
  28 =head1 SYNOPSIS
  29
  30     use base 'Maypole::Application';
  31
  32 =head1 DESCRIPTION
  33
  34 The all in wonder front-end.
  35
  36 =head1 AUTHOR
  37
  38 Sebastian Riedel, C<sri@oook.de>
  39 Idea by Marcus Ramberg, C<marcus@thefeed.no>
  40
  41 =head1 LICENSE
  42
  43 You may distribute this code under the same terms as Perl itself.