- Timestamp:
- Mar 10, 2017, 2:22:17 PM (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/klask
r229 r230 1380 1380 my $computerdb = computerdb_load(); 1381 1381 1382 printf "%-2 7s %-4s %-40s %-15s %-18s %-16s %s\n", qw(Switch Port Hostname-FQ IPv4-Address MAC-Address Date VLAN);1382 printf "%-28s %-8s %-40s %-15s %-18s %-16s %s\n", qw(Switch Port Hostname-FQ IPv4-Address MAC-Address Date VLAN); 1383 1383 print "--------------------------------------------------------------------------------------------------------------------------------------------\n"; 1384 1384 … … 1402 1402 $vlan = $computerdb->{$ip}{network}.'('.get_current_vlan_id($computerdb->{$ip}{network}).')' if $computerdb->{$ip}{network}; 1403 1403 1404 printf "%-28s %2s <------- %-40s %-15s %-18s %-16s %s\n",1404 printf "%-28s %8s <------- %-40s %-15s %-18s %-16s %s\n", 1405 1405 $computerdb->{$ip}{switch_hostname} || $computerdb->{$ip}{switch_description}, 1406 1406 $computerdb->{$ip}{switch_port_hr}, … … 2537 2537 for my $sw (keys %{$db_switch_connected_on_port{$swport}}) { 2538 2538 if (exists $db_switch_output_port{$sw}) { 2539 printf "%-28s %2s <--+ %2s %-25s\n", $sw_connect, $port_connect, $db_switch_output_port{$sw}, $sw;2539 printf "%-28s %8s <--+ %8s %-25s\n", $sw_connect, $port_connect, $db_switch_output_port{$sw}, $sw; 2540 2540 } 2541 2541 else { 2542 printf "%-28s %2s <--+%-25s\n", $sw_connect, $port_connect, $sw;2542 printf "%-28s %8s <--+ %-25s\n", $sw_connect, $port_connect, $sw; 2543 2543 } 2544 2544 }
Note: See TracChangeset
for help on using the changeset viewer.