From d5331075bb5d89cc11756bac30495b5e9cacf004 Mon Sep 17 00:00:00 2001
From: Jamie Cameron <jcameron@webmin.com>
Date: Mon, 19 Oct 2020 10:16:08 -0700
Subject: [PATCH] Fix perl warning

---
 bind8/bind8-lib.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/bind8/bind8-lib.pl b/bind8/bind8-lib.pl
index 14f581e95..5ed5228ac 100755
--- a/bind8/bind8-lib.pl
+++ b/bind8/bind8-lib.pl
@@ -103,7 +103,7 @@ sub get_bind_version
 {
 if (&has_command($config{'named_path'})) {
 	my $out = &backquote_command("$config{'named_path'} -v 2>&1");
-	if ($out =~ /(bind|named)\s+([0-9\.]+)/i) {
+	if ($out && $out =~ /(bind|named)\s+([0-9\.]+)/i) {
 		return $2;
 		}
 	}