Changeset 177
- Timestamp:
- Aug 24, 2016, 5:52:42 PM (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/klask
r176 r177 1235 1235 my $date = sprintf '%04i-%02i-%02i %02i:%02i', $year, $mon, $mday, $hour, $min; 1236 1236 1237 my $vlan = ''; 1238 $vlan = $computerdb->{$ip}{network}.'('.get_current_vlan_id($computerdb->{$ip}{network}).')' if $computerdb->{$ip}{network}; 1239 1237 1240 printf "%-28s %2s <------- %-40s %-15s %-18s %-16s %s\n", 1238 1241 $computerdb->{$ip}{switch_hostname} || $computerdb->{$ip}{switch_description}, … … 1242 1245 $computerdb->{$ip}{mac_address}, 1243 1246 $date, 1244 $ computerdb->{$ip}{network} || '';1247 $vlan; 1245 1248 } 1246 1249 return;
Note: See TracChangeset
for help on using the changeset viewer.