Help for this page
for my $h (@suggestionsTemp) { my $targetL = lc $h->{targetL}; ... $targets{$targetL}{count}++; } $_->{origin} = join ', ', sort keys %{$_->{origin}} for values %target +s;
$VAR1 = [ { ... 'targetL' => 'akzent' } ];