Select Code to Download

use Data::Dumper;
my $count = 1;
...
    }
    print "vnwlist: ", Dumper(\@vnwlist);
}

Count: 1
brlan = n
...
brnwlist: $VAR1 = [
          '192.169.73.0/255.255.255.240'
        ];