scottk/wlan-lanforge-scripts
1
0
Fork 0
mirror of https://github.com/Telecominfraproject/wlan-lanforge-scripts.git synced 2025-11-03 12:18:00 +00:00
Code Issues Packages Projects Releases Wiki Activity

l3_vid_group: perl use statements do not work inside conditionals

Browse Source
This commit is contained in:
Jed Reynolds
2020-03-05 15:10:44 -08:00
parent a7777555d2
commit 688cc9325f
1 changed files with 1 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
l3_vid_group.pl
View File

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