http://www.perlmonks.org?node_id=11106820


in reply to Re^3: Counting elements in array of cases (updated)
in thread Counting elements in array of cases

This is similar approach to mine (Re^4: Counting elements in array of cases).

But can you test it on:
{'targetL' => 'foisonnement', 'origin' => 'AMG', 'count' => '1 +'}, {'targetL' => 'foisonnement', 'origin' => 'IDBR', 'count' => ' +1'}, {'targetL' => 'foisonnement', 'origin' => 'AMG', 'count' => '1 +'}, {'targetL' => 'foisonnement', 'origin' => 'IDBR', 'count' => ' +1'},

Replies are listed 'Best First'.
Re^5: Counting elements in array of cases (updated)
by LanX (Archbishop) on Sep 28, 2019 at 19:12 UTC
    Yeah thanks, I even see the bug without testing.

    Ironically I first wrote unless ... ++ instinctively and then decided it's redundant. :)

    Will fix the code as soon as I get back to my PC

    update

    Fixed! :)

    Cheers Rolf
    (addicted to the Perl Programming Language :)
    Wikisyntax for the Monastery FootballPerl is like chess, only without the dice