#!/usr/local/bin/perl -wT
#########
# Author:        rmp
# Maintainer:    $Author: zerojinx $
# Created:       2007-03-28
# Last Modified: $Date: 2008-05-31 00:13:51 +0100 (Sat, 31 May 2008) $
# Id:            $Id: application 162 2008-05-30 23:13:51Z zerojinx $
# Source:        $Source: /cvsroot/clearpress/clearpress/cgi-bin/application,v $
# $HeadURL: https://zerojinx:@clearpress.svn.sourceforge.net/svnroot/clearpress/branches/prerelease-1.13/cgi-bin/application $
#
use strict;
use warnings;
use ClearPress::controller;

our $VERSION = do { my @r = (q$LastChangedRevision: 162 $ =~ /\d+/mxg); sprintf '%d.'.'%03d' x $#r, @r };

main();
0;

sub main {
  my $util = ClearPress::util->new();
  ClearPress::controller->handler($util);
}
