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