Help for this page

Select Code to Download

Select or download this

while (defined(my $line = <STDIN>)) {
    if ($line =~ /^inet\((\d+) active/) {
        print $line;
    }
}

Select or download this

inet.0: 498154 destinations, 3436699 routes (498150 active, 0 holddown
+, 5 hidden)
inet.3: 10103 destinations, 10107 routes (10103 active, 0 holddown, 0 
+hidden)
inet6.0: 25299 destinations, 115803 routes (25299 active, 0 holddown, 
+0 hidden)