Help for this page

Select Code to Download


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