summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPaul Buetow <paul@buetow.org>2022-04-21 23:36:39 +0200
committerPaul Buetow <paul@buetow.org>2022-04-21 23:36:39 +0200
commit48d7890b0112125b36132f477bd04e57623bb3a7 (patch)
tree5d85f926df59f35ba9f693a25ca1850f1a8de49c
parent70a177bfab34c1ea5146a33ec718e9db77fa20d6 (diff)
remove dependency to the Shell module - only use whats in the OpenBSD base install
-rw-r--r--lib/PerlDaemon/Logger.pm3
-rw-r--r--lib/PerlDaemon/PerlDaemon.pl1
2 files changed, 1 insertions, 3 deletions
diff --git a/lib/PerlDaemon/Logger.pm b/lib/PerlDaemon/Logger.pm
index 7285588..a5d632d 100644
--- a/lib/PerlDaemon/Logger.pm
+++ b/lib/PerlDaemon/Logger.pm
@@ -3,7 +3,6 @@ package PerlDaemon::Logger;
use strict;
use warnings;
-use Shell qw(mv);
use POSIX qw(strftime);
$| = 1;
@@ -79,7 +78,7 @@ sub rotatelog ($) {
$self->logmsg('Rotating logfile');
my $timestr = strftime "%Y%m%d-%H%M%S", localtime();
- mv($logfile, "$logfile.$timestr");
+ `mv $logfile $logfile.$timestr`;
return undef;
}
diff --git a/lib/PerlDaemon/PerlDaemon.pl b/lib/PerlDaemon/PerlDaemon.pl
index ac7e4d2..af848dc 100644
--- a/lib/PerlDaemon/PerlDaemon.pl
+++ b/lib/PerlDaemon/PerlDaemon.pl
@@ -5,7 +5,6 @@
use strict;
use warnings;
-use Shell qw(mv);
use POSIX qw(setsid strftime);
use Time::HiRes qw(gettimeofday tv_interval);