apply patch from mantis#2322 for deprecated perl usage

diff --git a/config/config_perl.pl b/config/config_perl.pl
index 1fb0db832efa6c43ac4af9e6e025fb342a5df67c..3d0679f87172c2c48b991918d985c2293bd410f1 100644 (file)
--- a/config/config_perl.pl
+++ b/config/config_perl.pl
@@ -14,7 +14,7 @@ if ($ARGV[0] eq "PERL_INSTALL_DIR") {
 
        my $d;
 
-       foreach $d qw(installvendorarch vendorarch installsitearch sitearch) {
+       foreach $d (qw(installvendorarch vendorarch installsitearch sitearch)) {
                if (exists($Config{$d}) and defined($Config{$d}) and
                        ($Config{$d} ne '') ) {
                        print "$Config{$d}";