John W. Krahn wrote:
if ( $2 < 128 ) { $low{ $1 }++; } else { $high{ $1 }++; }$total{ $1 }++;
Why track all three? You could just track (say) low and total, and derive high as (total - low) at print time.
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>