From 39bcb20dacb4c88da00c9a4982956b4337597fd7 Mon Sep 17 00:00:00 2001
From: Isaac Connor <iconnor@pseudo.connortechnology.com>
Date: Tue, 22 Dec 2015 12:59:37 -0500
Subject: [PATCH] Skip directories that have non-digits in them

---
 scripts/zmaudit.pl.in | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/scripts/zmaudit.pl.in b/scripts/zmaudit.pl.in
index bdd92524b..1e01628b8 100644
--- a/scripts/zmaudit.pl.in
+++ b/scripts/zmaudit.pl.in
@@ -178,6 +178,8 @@ MAIN: while( $loop ) {
     my $fs_monitors;
     foreach my $monitor ( glob("[0-9]*") )
     {
+		# Thie glob above gives all files starting with a digit.  So a monitor with a name starting with a digit will be in this list.
+		next if $monitor =~ /\D/;
         Debug( "Found filesystem monitor '$monitor'" );
         my $fs_events = $fs_monitors->{$monitor} = {};
         ( my $monitor_dir ) = ( $monitor =~ /^(.*)$/ ); # De-taint