Whitespace! Your keys all have an extra space at the end, since you split on /=/. To fix, change your split to /\s*=\s*/. As a tip, when printing debug statements, use obvious delimiters to catch this kind of error. For example:

while ( (my $key, my $value) = each %config ) {
    print "!$key! => ($value)\n";
}
[download]