Posted to tcl by apn at Mon Jun 27 17:05:22 GMT 2016view pretty

% get_network_adapter_info $net -unicastaddresses -prefixes
-unicastaddresses {{-flags 0 -address fe80::4168:c6a0:5308:1983%12 -prefixorigin 2 -suffixorigin 4 -dadstate 4 -validlifetime 4294967295 -preferredlifetime 4294967295 -leaselifetime 428038} {-flags 1 -address 192.168.1.128 -prefixorigin 3 -suffixorigin 3 -dadstate 4 -validlifetime 60519 -preferredlifetime 60519 -leaselifetime 109830}} -prefixes {{-flags 0 -address fe80::%12 -prefixlength 64} {-flags 0 -address fe80::4168:c6a0:5308:1983%12 -prefixlength 128} {-flags 0 -address ff00::%12 -prefixlength 8} {-flags 0 -address 192.168.1.0 -prefixlength 24} {-flags 0 -address 192.168.1.128 -prefixlength 32} {-flags 0 -address 192.168.1.255 -prefixlength 32} {-flags 0 -address 224.0.0.0 -prefixlength 4} {-flags 0 -address 255.255.255.255 -prefixlength 32}}