From ddb1777fa651d1046dc7ab6010c7d0d4e1d414ab Mon Sep 17 00:00:00 2001
From: Nicolas Boisselier <nicolas.boisselier@gmail.com>
Date: Sat, 25 May 2019 05:01:01 +0100
Subject: [PATCH] bin/iwtop

---
 bin/iwtop | 11 ++++++++++-
 1 file changed, 10 insertions(+), 1 deletion(-)

diff --git a/bin/iwtop b/bin/iwtop
index 59fa6f52..00dcd760 100755
--- a/bin/iwtop
+++ b/bin/iwtop
@@ -45,8 +45,17 @@ while (<>) {
 
 }
 
+my %max;
+for my $k (keys %net) {
+	for my $field (keys %{$net{$k}}) {
+		my $len = length($net{$k}{$field});
+		$max{$k}{$field} = $len if !$max{$k}{$field} or $max{$k}{$field}<$len;
+	}
+}
+
+#die Dumper \%max,$speed_size;
 #die Dumper \%net;
-#$speed_size = 33;
+
 my $fmt = "%6s | %17s | %9s | %2s | %".$speed_size."s | %3s | %3s | %s\n";
 printf $fmt,'INT','MAC','FREQ','CH','SPEED','SIG','QLT','NAME';
 for my $k (sort {
-- 
2.47.3