#!/usr/bin/perl -T
use warnings;
use strict;
use Simba::CA;

$ENV{PATH} = "/usr/bin";

open(my $log, '>>', '/var/log/simba/ca.log');
$log->autoflush(1);

my $ca = Simba::CA->new({
			    dbi_file => $ENV{SIMBA_DB_CONN} || "$ENV{HOME}/.dbi/simba",
			    fh_log   => $log,
			});

$ca->run();