diff options
Diffstat (limited to 'lib/PerlDaemon/Logger.pm')
| -rw-r--r-- | lib/PerlDaemon/Logger.pm | 3 |
1 files changed, 1 insertions, 2 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; } |