sort排序特别是fibbery请进

[zll_lover]

my %a;

$a{'aa'}=1;
$a{'bb'}=1;
$a{'cc'}=1;
$a{'dd'}=1;
$a{'ee'}=1;

my %areaArray;
$areaArray{'aa'}="aa";
$areaArray{'dd'}="dd";
$areaArray{'bb'}="bb";
$areaArray{'cc'}="cc";
$areaArray{'ee'}="ee";


my %area;
$area{'aaaa'}=1;
$area{'bbbb'}=3;
$area{'cccc'}=2;
$area{'eeee'}=6;
$area{'bbbb'}=3;
$area{'ffff'}=7;
$area{'gggg'}=8;

foreach my $key (%a)
{

foreach my $key1 (sort {($area{$key.$b} eq ''?0:$area{$b})<=>($area{$key.$a} eq ''?0:$area{$a})}keys %areaArray)
{
print $key1."----".$areaArray{$key1}."\n";
}
}

刚才那个问题其实我是想做个铺垫的，这个才是最后我想了解的，所以给删了重新发

[fibbery]

哦，我还以为是管理员删除的呢，我都没有权利删除！

[iambic]

楼主有问题吗？如果有，问题在哪里？

[zll_lover]

以上代码不能排序的，请问如何解决？

[fibbery]

道理是一样的，你可以通过exists函数来确认哈希变量中是否有测试中的key，如果存在则返回true，否则，返回false。

这个程序你到底要实现什么呀？是不是弄得太复杂了？

[zll_lover]

我测试了，但是还是不能正确排序

[fibbery]

你的目标排序结果应该是什么样的？

[zll_lover]

由大到小这个用你的结果还是乱的，上个帖子的那个是可以的

[fibbery]

你是要在%a的key集合中做笛卡尔积，然后再%area中查找排序吗？

例如：笛卡尔积会生成诸如aaaa aabb bbaa bbbb cccc aacc ......

[iambic]

请描述清楚问题……
初步来看这个思路是有问题的，改细节不如重写。