Re: How do I convert entire hash to lowercase?

[japhy]

(Updated.) I'd do this:

@hash{map lc, @k} =
  map lc, delete @hash{@k = keys %hash};

Nifty?

_____________________________________________________
Jeff[japhy]Pinyan: Perl, regex, and perl hacker.
s++=END;++y(;-P)}y js++=;shajsj<++y(p-q)}?print:??;

[data64]

I don't think I completely understand how exactly this piece of code works.
Can someone explain ?

thanks.

[japhy]

I think I can...

# @hash{map lc, @k} =
#   map lc, delete @hash{@k = keys %hash};

@keys = keys %hash;
@lc_values = map { lc $_ } @hash{@keys};  # hash slice
@lc_keys   = map { lc $_ } @keys;

delete @hash{@keys};  # basically:  %hash = ()
@hash{@lc_keys} = @lc_values;

</code>

_____________________________________________________
Jeff[japhy]Pinyan: Perl, regex, and perl hacker.
s++=END;++y(;-P)}y js++=;shajsj<++y(p-q)}?print:??;