From 82eaabb6e7170514753f92804da5e6ea676caa0c Mon Sep 17 00:00:00 2001
From: Paul Buetow <paul@buetow.org>
Date: Mon, 13 Jun 2011 09:44:32 +0000
Subject: Released PerlDaemon v1.2

---
 bin/perldaemon | 10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

(limited to 'bin')

diff --git a/bin/perldaemon b/bin/perldaemon
index feaa68a..11c1a7e 100755
--- a/bin/perldaemon
+++ b/bin/perldaemon
@@ -35,6 +35,10 @@ logrotate () {
         kill -HUP $(cat ./run/perldaemon.pid)
 }
 
+keys () {
+        perl -I$LIBDIR $LIBDIR/PerlDaemon/PerlDaemon.pl config=./conf/perldaemon.conf keys=1 $@
+}
+
 case $ARG in
 	start)
                 shift
@@ -59,8 +63,12 @@ case $ARG in
                 start daemon.daemonize=no $@
 	;;
 
+	keys)
+                keys $@
+	;;
+
 	*)
-                echo "Usage: $0 <start|stop|restart|logrotate|foreground>"
+                echo "Usage: $0 <start|stop|restart|logrotate|foreground|keys> [key1=val1 [[key2=val2] ...]]"
                 exit 1
 	;;
 esac
-- 
cgit v1.2.3