Help for this page

Select Code to Download


  1. or download this
    while (defined(my $line = <STDIN>)) {
        if ($line =~ /^inet\((\d+) active/) {
            print $line;
        }
    }
    
  2. 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)