my %bits = ('male' => 1, 'female' => 2, 'child' => 4);

my %tally;
foreach my $array_ref ( @occurances ) {
  my $vector = 0;
  $vector += $bits{$_} for @$array_ref;
  $tally{$vector}++;
}