Changeset 70 for trunk

Timestamp:

Nov 2, 2010, 4:55:37 PM (14 years ago)

Author:

g7moreau

Message:

• Add VLAN info to exportdb when txt format

File:

• trunk/klask (modified) (3 diffs)

trunk/klask

@@ -887 +887 @@
    my $computerdb = YAML::Syck::LoadFile("$KLASK_DB_FILE");
 
-   printf "%-24s %-4s            %-30s %-15s %-18s %-s\n", qw(Switch Port Hostname IPv4-Address MAC-Address Date);
-   print "---------------------------------------------------------------------------------------------------------------------------\n";
+   printf "%-25s %-4s            %-40s %-15s %-18s %-16s %s\n", qw(Switch Port Hostname IPv4-Address MAC-Address Date VLAN);
+   print "-------------------------------------------------------------------------------------------------------------------------------------------\n";
 
    LOOP_ON_IP_ADDRESS:
@@ -906 +906 @@
       my $date = sprintf '%04i-%02i-%02i %02i:%02i', $year, $mon, $mday, $hour, $min;
 
-      printf "%-25s  %2s  <-------  %-30s %-15s %-18s %s\n",
+      printf "%-26s  %2s  <-------  %-40s %-15s %-18s %-16s %s\n",
          $computerdb->{$ip}{switch_hostname} || $computerdb->{$ip}{switch_description},
          $computerdb->{$ip}{switch_port},
@@ -912 +912 @@
          $ip,
          $computerdb->{$ip}{mac_address},
-         $date;
+         $date,
+         $computerdb->{$ip}{network} || '';
       }
    return;