my %freq = () ;
map { $freq{$_}++ } @items ;