my %uniq = map {
    my %tmp = map { $_ => 1} @$_;
    $_ => [sort keys %tmp];
} keys %arrays;