From 688cc9325f0d52ea0f2d109276d482936e71f699 Mon Sep 17 00:00:00 2001
From: Jed Reynolds <jreynolds@candelatech.com>
Date: Thu, 5 Mar 2020 15:10:44 -0800
Subject: [PATCH] l3_vid_group: perl use statements do not work inside
 conditionals

---
 l3_vid_group.pl | 7 +------
 1 file changed, 1 insertion(+), 6 deletions(-)

diff --git a/l3_vid_group.pl b/l3_vid_group.pl
index 90cf480c..81bd33c0 100755
--- a/l3_vid_group.pl
+++ b/l3_vid_group.pl
@@ -19,7 +19,7 @@ $| = 1;
 # This is before run-time, so cannot condition this with normal 'if' logic.
 use lib '/home/lanforge/scripts';
 use lib "./";
-
+use Data::Dumper;
 use LANforge::Endpoint;
 use LANforge::Port;
 use LANforge::Utils;
@@ -124,12 +124,7 @@ if ($show_help) {
    exit 0;
 }
 
-if (defined $ENV{DEBUG}) {
-  use Data::Dumper;
-}
-
 if ($::debug) {
-  use Data::Dumper;
   $ENV{DEBUG} = 1 if (!(defined $ENV{DEBUG}));
 }