From: Geraint Edwards <gedgey@gmail.com>
Date: Thu, 28 Dec 2017 15:53:51 +0000 (+0000)
Subject: Check ARGV before subscripting it
X-Git-Url: https://git.exim.org/users/jgh/exim.git/commitdiff_plain/44de51a174765f7f5ecb250638cdb3fe64ec67dc

Check ARGV before subscripting it
---

diff --git a/src/src/eximstats.src b/src/src/eximstats.src
index 76cfe7e97..8eb5cac89 100644
--- a/src/src/eximstats.src
+++ b/src/src/eximstats.src
@@ -557,7 +557,7 @@ use File::Basename;
 # use Time::Local;  # PH/FANF
 use POSIX;
 
-if ($ARGV[0] eq '--version') {
+if (@ARGV and $ARGV[0] eq '--version') {
     print basename($0) . ": $0\n",
         "build: EXIM_RELEASE_VERSIONEXIM_VARIANT_VERSION\n",
         "perl(runtime): $]\n";