my @msgs = <LOG>;

foreach $msg(@msgs) {
	if ($msg =~ ": error") {
		$errors++;
	}
	if ($msg =~ ": warning") {
		$warnings++;
	}
	if (($msg =~ "error") and ($msg =~ "warning") and !($msg =~ "0 error")) {
		$failures++;
		push @badProjects, $msg;
	}
	if ($msg =~ "0 error") {
		$success++;
		push @goodProjects, $msg;
	}
}