2006-10-02 12:56:36 +02:00
|
|
|
#!/usr/bin/perl -T
|
|
|
|
|
use warnings;
|
|
|
|
|
use strict;
|
|
|
|
|
use Simba::DA;
|
2006-11-20 12:25:55 +01:00
|
|
|
use lib 'blib/lib';
|
2006-10-02 12:56:36 +02:00
|
|
|
|
2006-11-20 00:00:08 +01:00
|
|
|
open(my $log, '>>', '/var/log/simba/da.log');
|
|
|
|
|
$log->autoflush(1);
|
|
|
|
|
my $da = Simba::DA->new({fh_log => $log});
|
2006-10-02 12:56:36 +02:00
|
|
|
|
|
|
|
|
$da->run();
|
