DB<6> $h2{ $_ }++ for map $_->[ 1 ], @records
  DB<7> p scalar keys %h2
9027