for (@test) {$counts{$_}++}