- $uninfo->{ chr $di->{$_} }->[1], # name
- $uninfo->{ chr $di->{$_} }->[0], # class
- (map {('', $_)} $uninfo->{ chr $di->{$_} }->[4] // ()), # string
+ $uninfo->{ $di->{$_} }->[1] // '', # name
+ $vim->{$_}
+ ? $rfc->{$_} ? 'u-di' : 'u-prop' # vim+rfc or vim only
+ : $rfc->{$_} ? 'ex' : 'u-prop ex', # rfc only or neither
+ ($uninfo->{ $di->{$_} }->[0] // '') =~ s/ u-di| u-prop| ex//gr, # class
+ $uninfo->{ $di->{$_} }->[4] // (), # string