[PerlChina] Re: 有关散列的键不能使用正则表达式的问题

谢谢！我搞懂了！

On 3月7日, 下午10时36分, Lee Duhem <lee.du...@gmail.com> wrote:
> 2009/3/7 Leeo <yeli...@163.com>:
>
> > 我想通过正则表达式S///来去除散列键中开头的空格，具体方法如下：
>
> > foreach (keys %hash_name){
> > s/^\s+//g;
> > }
>
> > print keys %hash_name;
>
> 你可以这么做：
>
> while (my ($key, $val) = each %hash_name) {
> (my $k = $key) =~ s/^\s+//g;
> $new_hash{$k} = $val;
>
> }
>
> delete %hash_name;
>
> 反正即使在 %hash_name 中修改，改了 key 之后也是要在 hash 中增加新项的，
> 干脆用个新的 hash.
>
> lee
--~--~---------~--~----~------------~-------~--~----~
您收到此信息是由于您订阅了 Google 论坛"PerlChina Mongers 讨论组"论坛。
要在此论坛发帖，请发电子邮件到 perlchina@googlegroups.com
要退订此论坛，请发邮件至 perlchina+unsubscribe@googlegroups.com
更多选项，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问该论坛
-~----------~----~----~----~------~----~------~--~---