Then do your counting in a case-insensitive approach:

my %count;

$count{ lc $_ }++
    for map { $_->{targetL} } @$results;

my $winner = $count{ "akzent" };

my @matched = grep { lc $_->{targetL} eq $winner } @$results;
[download]