on 11/14/01 4:30 PM, Bob Dalgleish at [EMAIL PROTECTED]
wrote:

> How about:
> 
> while ( $_ = <> ) {
> chomp;
> ($code, $person) = split(/\s/);
> $codeCount{$code} ++;
> }
> 
> # print them out
> foreach $code (sort keys %codeCount) {
> print "$code:\t$codeCount{$code}\n";
> }
> 

It might work, but, I forgot to point out that some people repeat activities
and should only be counted once.

=========================================================================
NOVA                                          505 W. Olive Ave. Suite 550
Elton Hughes (Information Technology)                  Sunnyvale CA 94086
Phone: 408-730-7235                                     Fax: 408-730-7643
-------------------------------------------------------------------------



Reply via email to