如何取出hash中的第一个key和value

choose2005

如何取出hash中的第一个key和value？

nkcsx

什么叫第一个？ hash是无序的

choose2005

sort 之后

admove

是不是这么写？

use strict; use warnings; my %people = (     "name"   => "noname",     "age"    => "18",     "sex"    => "male", ); my @arr = sort keys %people; print $arr[0]

[ 本帖最后由 admove 于 2007-7-6 11:46 编辑 ]

nkcsx

$key = (sort keys %hash)[0];
print $key, '=>', $hash{$key};

flw

看书看书！