bigsdb.pl 1.5 KB
Newer Older
Keith Jolley's avatar
Keith Jolley committed
1
2
3
#!/usr/bin/perl -T
#bigsdb.pl
#Written by Keith Jolley
Keith Jolley's avatar
Keith Jolley committed
4
#Copyright (c) 2010-2015, University of Oxford
Keith Jolley's avatar
Keith Jolley committed
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
#E-mail: keith.jolley@zoo.ox.ac.uk
#
#This file is part of Bacterial Isolate Genome Sequence Database (BIGSdb).
#
#BIGSdb is free software: you can redistribute it and/or modify
#it under the terms of the GNU General Public License as published by
#the Free Software Foundation, either version 3 of the License, or
#(at your option) any later version.
#
#BIGSdb is distributed in the hope that it will be useful,
#but WITHOUT ANY WARRANTY; without even the implied warranty of
#MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
#GNU General Public License for more details.
#
#You should have received a copy of the GNU General Public License
#along with BIGSdb.  If not, see <http://www.gnu.org/licenses/>.
Keith Jolley's avatar
Keith Jolley committed
21
package BIGSdb::main;
Keith Jolley's avatar
Keith Jolley committed
22
use strict;
23
use warnings;
Keith Jolley's avatar
Keith Jolley committed
24
use version; our $VERSION = qv('1.10.1');
25
use 5.010;
Keith Jolley's avatar
Keith Jolley committed
26

Keith Jolley's avatar
Keith Jolley committed
27
28
29
30
###########Local configuration################################
use constant {
	CONFIG_DIR       => '/etc/bigsdb',
	LIB_DIR          => '/usr/local/lib',
31
	DBASE_CONFIG_DIR => '/etc/bigsdb/dbases'
Keith Jolley's avatar
Keith Jolley committed
32
33
};
#######End Local configuration################################
Keith Jolley's avatar
Keith Jolley committed
34

Keith Jolley's avatar
Keith Jolley committed
35
36
37
use Log::Log4perl qw(get_logger);               #Also need Log::Dispatch::File
use lib (LIB_DIR);
use BIGSdb::Application;
38
use BIGSdb::OfflineJobManager;
Keith Jolley's avatar
Keith Jolley committed
39
40
41
42

my $r = shift;    #Apache request object (used for mod_perl)
Log::Log4perl->init_once( CONFIG_DIR . '/logging.conf' );
BIGSdb::Application->new( CONFIG_DIR, LIB_DIR, DBASE_CONFIG_DIR, $r );