Help for this page
my $names = [ ... id => undef, }, ];
foreach my $a (@{ $names }) { push(@ids, $a->{id} // ()); }
my $ids = join ',', map { $_->{id} // () } @$names;