my %ntests;  $ntests{$_} = 0 for @tests;