Repository List / Contenido / utf8 / samples / promosuite / services / script.tmpl @ r296

#!/usr/bin/perl

use strict;
use warnings "all";
use locale;

use FindBin;
BEGIN {
	require "$FindBin::RealBin/../lib/Modules.pm";
}

use Contenido::Globals;
use Contenido::Init;
use ErrorTee;
use PidFile;


# begin
Contenido::Init->init();

#PidFile->new($state);               # db-based locking   (run only on one host)
#PidFile->new($state, per_host=>1);  # db-based locking   (run on whole cluster)
#PidFile->new($state->{run_dir});    # file-based locking (run on whole cluster)

my $keeper_module = $state->project.'::Keeper';
$keeper = $keeper_module->new($state);

############################################
# please use:
#     $state->{log_dir} for logging
#     $state->{tmp_dir} for temporary files
###########################################