- or download this
for (keys(%{$ini{$hostnames[$i]}})) {
print "Slot: $_\n";
...
print "IfIndex: ${$ini{$hostnames[$i]}}{$_}\n";
push @ifindices,${$ini{$hostnames[$i]}}{$_};
}
- or download this
for (keys(%{$Hostpart_from_INI})) {
- or download this
for (keys(%Host_Data_from_INI)) {
- or download this
for $_ (keys(%Host_Data_from_INI)) {
- or download this
perl -le 'for (1,2,3) { print $_; }'
- or download this
for (keys(%Host_Data_from_INI)) {
push @slots,$_;
push @ifindices,$Host_Data_from_INI{$_};
}