Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl
use strict;
...
    ++$freqs{$_} for @elements;
    return %freqs;
}

Select or download this

[
  { "0" => 6, "1" => 2, "2" => 2 },
  { "0" => 3, "1" => 2, "2" => 2, "3" => 1, "4" => 1, "5" => 1 },
  { "0" => 1, "1" => 1, "5" => 1, "11" => 1, "12" => 1, "13" => 1, "15
+" => 1, "17" => 1, "19" => 2 },
]