foreach my $adv79key (keys %adv79) { foreach my $exerrors (@exerrors) { 
	if ($adv79key != $exerrors) {
		print "$adv79key is a new error\n";
				} else { 
			print "$adv79key is an old error\n"; }}}