Re: How do I convert entire hash to lowercase?

(Updated.) I'd do this:

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

Nifty?

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

Comment on Re: How do I convert entire hash to lowercase? Download Code

Replies are listed 'Best First'.
Re: Re: How do I convert entire hash to lowercase? by data64 (Chaplain) on Nov 18, 2001 at 21:49 UTC
I don't think I completely understand how exactly this piece of code works. Can someone explain ? thanks.	[reply]
Re: Re: Re: How do I convert entire hash to lowercase? by japhy (Canon) on Nov 18, 2001 at 23:20 UTC
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;` [download] </code> _____________________________________________________ Jeff`[japhy]`Pinyan: Perl, regex, and perl hacker. `s++=END;++y(;-P)}y js++=;shajsj<++y(p-q)}?print:??;`	[reply] [d/l]