关联数组使用问题

takefree

在perl里能使用二维关联数组么？
我是这么用的，但不知道对否，请指点：
%TYPE1=(
        "0"=>"好好好",
        "1"=>"坏坏坏",
);

%TYPE2=(
        "0"=>"新新新",
        "1"=>"旧旧旧",
);

%TYPE_FOR=(
        "0"=>"%URL_TYPE1",
        "1"=>"%URL_TYPE2",
);

我想通过%TYPE_FOR来取得"好好好","坏坏坏","新新新"或"旧旧旧"，应该怎么做呢？代码怎么写，请指点一下！谢谢

[ 本帖最后由 takefree 于 2006-6-28 14:22 编辑 ]

flw

不太明白你在说什么。
重新描述一下？

takefree

就是我定义一个关联数组：%TYPE_FOR，这个数组里的值又是另外的两个关联数组：%TYPE1，%TYPE2，我先在想取得"好好好"这个值，必须通过%TYPE_FOR，应该怎么取呢？？？

我这样用：$TYPE_FOR{0}{0},但是不行，$TYPE_FOR[0][0]也不行。
在我的应用当中，$TYPE_FOR的键值都是通过变量传递的，也就是$TYPE_FOR{0}{0}在我的应用中是：$TYPE_FOR{$p1}{$p2},其中传递给$p1,$p2的值都是0。

应该怎么用呢？

flw

把

1. %TYPE_FOR=(
   
2.         "0"=>"%URL_TYPE1",
   
3.         "1"=>"%URL_TYPE2",
   
4. );

复制代码

改成

1. %TYPE_FOR=(
   
2.         "0"=>\%URL_TYPE1,
   
3.         "1"=>\%URL_TYPE2,
   
4. );

复制代码

然后就可以 $TYPE_FOR{0}{0} 这样子了。

takefree

是吗？试试先！

takefree

还是这里高人多！多谢flw版主！我是Perl初学者，好费劲的说！

flw

你提供完整的信息是我帮助你的前提。谢谢合作！

takefree

不会解决问题，至少应该能说清楚问题，那也是应该的。呵呵

huaxue

我是这样试的,,请问错在哪里啊/?谢谢1!
      1 #!/usr/bin/perl
      2 %TYPE1=(    "0"=>"daiyy",
      3             "1"=>"suger",
      4        );
      5
      6 %TYPE2=(    "0"=>"zhouxw",
      7             "1"=>"zhoul",
      8        );
      9
     10 %TYPE_FOR=(
     11             "0"=>\%URL_TYPE1,
     12             "1"=>\%URL_TYPE2,
     13           );
     14 print "$TYPE_FOR{0}{0}\n";

huaxue

5555,没人回答吗/?