for (keys(%{$ini{$hostnames[$i]}})) {
 print "Slot: $_\n";
 push @slots,$_;
 print "IfIndex: ${$ini{$hostnames[$i]}}{$_}\n";
 push @ifindices,${$ini{$hostnames[$i]}}{$_};
}

##</code><code>##

for (keys(%{$Hostpart_from_INI})) {

##</code><code>##

for (keys(%Host_Data_from_INI)) {

##</code><code>##

for $_ (keys(%Host_Data_from_INI)) {

##</code><code>##

perl -le 'for (1,2,3) { print $_; }'

##</code><code>##

for (keys(%Host_Data_from_INI)) {
 push @slots,$_;
 push @ifindices,$Host_Data_from_INI{$_};
}