foreach my $source (keys %sources) {
my $srchash = substr $source, 0, 1;
next unless -e "$config{version_packages_dir}/$srchash/$source";
foreach my $source (keys %sources) {
my $srchash = substr $source, 0, 1;
next unless -e "$config{version_packages_dir}/$srchash/$source";
warn "Unable to open $config{version_packages_dir}/$srchash/$source for reading: $!";
$version->load($version_fh);
}
warn "Unable to open $config{version_packages_dir}/$srchash/$source for reading: $!";
$version->load($version_fh);
}