On Wednesday 08 February 2006 15:51, JupiterHost.Net wrote:
> So for instance to treat upper and lowercase the same (IE 't' is
> considered the same as 'T')
>
> for my $letter(@letters) {
>      $letter_count{ lc($letter) }++ if lc($letter) =~ m{^[a-z]$};
> }

or just (untested):
$letter_count{$_}++ for map lc, @letters;

-- 
Bjørge Solli - Office:+47 55205847 cellph.:+47 91614343
Nansen Environmental and Remote Sensing Center - Bergen, Norway
http://www.nersc.no Reception: +47 55205800
Dept.: Mohn-Sverdrup Center for Global Ocean Studies 
       and Operational Oceanography

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


Reply via email to