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

dhcp-lease: Comment out some superfluous output.

Browse Source
This commit is contained in:
Ben Greear
2019-02-12 16:15:17 -08:00
parent efc3aa4b0c
commit d64b1b0379
1 changed files with 6 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
dhcp-lease-list.pl
View File

@@ -107,11 +107,12 @@ sub process_leases() {
# skip outdated lines # skip outdated lines
next if ($opt_keep eq 'active' and $3 lt $gm_now); next if ($opt_keep eq 'active' and $3 lt $gm_now);
if ($counter) { # I like 'human' output, but this part is not helpful when parsing that human output by another script. --Ben
my $percent = (($counter / $total_leases)*100); #if ($counter) {
printf "Processing: %2d%% complete\r", $percent; # my $percent = (($counter / $total_leases)*100);
++$counter; # printf "Processing: %2d%% complete\r", $percent;
} # ++$counter;
#}
my $hostname = "-NA-"; my $hostname = "-NA-";
if ($6) { if ($6) {