foreach(keys $config->acls) {
	print "$_";
}

##</code><code>##

while(my ($name, $value) = each $config->acls()) {
	print "$name<br>$value<br>";
}