bin/iwtop

diff --git a/bin/iwtop b/bin/iwtop
index 59fa6f520ea29982b707ac49e3f7d4b63b544b62..00dcd76007cb647637cc4577df8f82d7cf8a2e9f 100755 (executable)
--- 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 {