- or download this
my %oids = (
"ifName" => {
...
5 => "Gi2/0/1",
},
);
- or download this
- or:
my %oids = (
...
5 => "Gi0/0",
},
);
- or download this
my (@a, @b);
my @port_ifIndices = sort {
...
foreach my $ifIndex (@port_ifIndices) {
print ("$ifIndex: $oids{ifName}{$ifIndex}\n");
}
- or download this
2: Gi1/0/0
1: Gi1/0/1
3: Gi1/1/1
4: Gi2/0/0
5: Gi2/0/1