my @posns = split m{}, $tests[ $idx ]->[ $subidx ];
             $results[ $idx ]->[ $subidx ] ++