Improved diagnostic output: when the build fails because a package cannot be cloned into the build drive, it says which package and the repo source and destination.
Improved caching logic, so that it doesn't depend on network availability as much.
Improved indentation.
my @asYarpFiles = ();
open(FILE, $ARGV[0]);
while ( <FILE> )
{
if ( m/^[^,]*,[^,]*,([^,]*)/ )
{
my $sFile = $1;
chomp $sFile;
# print "$sFile\n";
push(@asYarpFiles, $sFile);
}
}
close(FILE);
my $nYarpFiles = scalar(@asYarpFiles);
#print "Found $nYarpFiles files to parse\n";
my $nTotalRecipeErrors = 0;
for my $nYarpFile (@asYarpFiles)
{
my $nRecipeErrors = 0;
# print "Parsing file $nYarpFile...\n";
open(FILE, $nYarpFile);
while ( <FILE> )
{
if ( m/^Raptor recipe failures:\s+(\d+)$/ )
{
# print "Raptor recipe failures: $1\n";
$nRecipeErrors = $1;
}
}
close(FILE);
# print "Recipe errors in $nYarpFile: $nRecipeErrors\n";
$nTotalRecipeErrors += $nRecipeErrors;
}
#print "Total recipe errors across all files: $nTotalRecipeErrors\n";
print "$nTotalRecipeErrors";