diff --git a/backup b/backup index 33239eb..fa58ca7 100755 --- a/backup +++ b/backup @@ -6,5 +6,9 @@ use Simba::CA; $ENV{PATH} = "/usr/bin"; my $ca = Simba::CA->new(); +$ca->targets([ + { host => 'bernon.wsr.ac.at', dir => '/' } + ]); +$ca->basedir('/backup/simba'); $ca->run(); diff --git a/lib/Simba/DA.pm b/lib/Simba/DA.pm index b255dc7..03eede2 100644 --- a/lib/Simba/DA.pm +++ b/lib/Simba/DA.pm @@ -48,7 +48,7 @@ sub new { $self->{fh_log} = exists($opt->{fh_log}) ? $opt->{fh_log} : \*STDERR; $self->{log_level} = 99; - die "PERL_UNICODE must not be set!" if $ENV{PERL_UNICODE}; + #die "PERL_UNICODE must not be set!" if $ENV{PERL_UNICODE}; return $self;