DB<4> $h{ $_ }++ for map $_->[ 0 ], @records
  DB<5> p scalar keys %h
16215
  DB<6>