- open OLD, '<', "$TOPDIR/files/packages/package_names_$suite.$oldday"
- or die "Couldn't open OLD file $TOPDIR/files/packages/package_names_$suite.$oldday: $!";
+ -d "$packagesdir/$oldday" or do {
+ warn "Warning: No information available for $oldday\n";
+ next unless $lastday;
+ $oldday = $lastday;
+ };
+ -d "$packagesdir/$newday" or do {
+ warn "Warning: No information available for $newday\n";
+ next;
+ };
+ $lastday = $newday;
+ warn "Process: age=$age oldday=$oldday newday=$newday\n" if $debug;
+ open OLD, '<', "$packagesdir/$oldday/package_names_$suite"
+ or die "Error: Couldn't open OLD file $packagesdir/$oldday/package_names_$suite: $!\n";
+ open NEW, '<', "$packagesdir/$newday/package_names_$suite"
+ or die "Error: Couldn't open NEW file $packagesdir/$newday/package_names_$suite: $!\n";