#!/Perl/bin/perl
use strict;
use warnings;
use CGI::Carp;
use FindBin();
use lib qw(../pm);
use CMS;

my $webapp = CMS->new();
$webapp->run();