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

我想通过正则表达式S///来去除散列键中开头的空格，具体方法如下：

foreach (keys %hash_name){
s/^\s+//g;
}

print keys %hash_name;

结果是正则表达式对散列的键不起作用，我想问下是什么原因？麻烦大家指点下！
--~--~---------~--~----~------------~-------~--~----~
您收到此信息是由于您订阅了 Google 论坛"PerlChina Mongers 讨论组"论坛。
要在此论坛发帖，请发电子邮件到 perlchina@googlegroups.com
要退订此论坛，请发邮件至 perlchina+unsubscribe@googlegroups.com
更多选项，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问该论坛
-~----------~----~----~----~------~----~------~--~---