note
Russ
scalar
grep
count
Sounds like a job for [grep] (my favorite!):
<code>
%ResultsByCode = (
registered => scalar(grep {$_ == 1} @resultStatus),
unregistered => scalar(grep {$_ == 2} @resultStatus),
waiting => scalar(grep {$_ == 3} @resultStatus),
)
</code>
<p><a href="/index.pl?node=Russ">Russ</a><br>
Brainbench 'Most Valuable Professional' for Perl
171363
171363