initialize kid_count to 0; minor log tweak

Signed-off-by: Bill Erickson <berick@esilibrary.com>

diff --git a/SIPServer.pm b/SIPServer.pm
index 3448ed5..d41c09c 100644 (file)
--- a/SIPServer.pm
+++ b/SIPServer.pm
@@ -167,7 +167,7 @@ sub process_request {
 # Multiplex.
 
 my %kid_hash;
-my $kid_count;
+my $kid_count = 0;
 
 sub REAPER {
   for (keys(%kid_hash)) {
@@ -296,7 +296,7 @@ sub mux_input {
 sub mux_close {
     my ($self, $mux, $fh) = @_;
     delete $active_connections{''.$fh};
-    syslog("LOG_DEBUG", "multi: cleaning up child: $fh; ". 
+    syslog("LOG_DEBUG", "multi: mux_close cleaning up child: $fh; ". 
         scalar(keys %active_connections)." remain");
 }