remove each() from the docs v0.09_02
Brian Cassidy [Wed, 14 Nov 2007 02:27:16 +0000 (02:27 +0000)]
lib/Config/Any.pm

index 301e006..bec4fc3 100644 (file)
@@ -25,7 +25,7 @@ This document describes Config::Any version 0.09_02
     my $cfg = Config::Any->load_files({files => \@filepaths, ... });
 
     for (@$cfg) {
-        my ($filename, $config) = each %$_;
+        my ($filename, $config) = %$_;
         $class->config($config);
         warn "loaded config from file: $filename";
     }