Yet Another CPAN Grep

List-Util-MaybeXS ( H/HA/HAARG/List-Util-MaybeXS-1.500014.tar.gz, HAARG, 2025; MetaCPAN )

List-Util-MaybeXS/lib/List/Util/PP.pm ( view source; MetaCPAN )

r::key   { $_[0][0] }
sub List::Util::PP::_Pair::value { $_[0][1] }
sub List::Util::PP::_Pair::TO_JSON { [ @{$_[0]} ] }

sub uniq (@) {
  my %seen;
  my $undef;
  my @uniq = grep defined($_) ? !$seen{