%ResultsByCode = ( registered => scalar(grep {$_ == 1} @resultStatus), unregistered => scalar(grep {$_ == 2} @resultStatus), waiting => scalar(grep {$_ == 3} @resultStatus), )