my %uniq = map {
    my %saw;
    $_ => [map !$saw{$_}++, @$_];
} keys %arrays;