关于hash的值与关键字的问题

ericson114

因为hash中关键字是唯一的，值可以是重复的
那么能否做到，输入一个值，得出好几个hash的关键字呢？
请教大侠们。。。//bow

churchmice

当然可以
foreach (keys %hash){
print if $hash{$_} eq $your_desired_value;
}

mouse.rice

不行

churchmice

原帖由 mouse.rice 于 2008-2-26 22:30 发表
不行

really?
Show your output

可能是最后没有换行所以看不清吧
可以用
print "$_\n" 替换上面的print ;

类似下面的code

1. 
   
2. #!/usr/bin/perl
   
3. use strict;
   
4. use warnings;
   
5. my %hash = ( "a" => "c",
   
6.              "b" => "d",
   
7.              "c" => "c",
   
8.              );
   
9. my $value = shift;
   
10. foreach(keys %hash){
    
11. print "$_\n" if $hash{$_} eq $value;
    
12. }
    

复制代码

<lig@other-server:~/chinaunix>$ ./reverse a
<lig@other-server:~/chinaunix>$ ./reverse c
c
a
<lig@other-server:~/chinaunix>$ ./reverse d
b

churchmice

或者简单点可以用grep

1. 
   
2. #!/usr/bin/perl
   
3. use strict;
   
4. use warnings;
   
5. my %hash = ( "a" => "c",
   
6.              "b" => "d",
   
7.              "c" => "c",
   
8.              );
   
9. my $value = shift;
   
10. my @match = grep  $hash{$_} eq $value , keys %hash;
    
11. print "@match\n";
    

复制代码

churchmice

发现我最近活得真是太无聊了

mouse.rice

理解错了LZ的意思～

ericson114

谢谢了，受教了~~