Perl 语言编程 - Linux教程

for $href ( @AoH ) {print "{ ";for $role ( keys %$href ) {print "$role=$href->{$role} ";}print "}\n";}以 及 带 着 引 用 打 印 :for $i ( 0 .. $#AoH ) {print "$i is { ";for $role ( keys %{ $AoH[$i] } ) {print "$role=$AoH[$i]{$role} ";}print "}\n";}9.4 散 列 的 散 列多 维 的 散 列 是 Perl 里 面 最 灵 活 的 嵌 套 结 构 。 它 就 好 象 绑 定 一 个 记 录 , 该 记 录 本 身 包 含 其 他记 录 。 在 每 个 层 次 上 , 你 都 用 一 个 字 串 ( 必 要 时 引 起 ) 做 该 散 列 的 索 引 。 不 过 , 你 要 记 住 散列 里 的 键 字 / 数 值 对 不 会 以 任 何 特 定 的 顺 序 出 现 ; 你 可 以 使 用 sort 函 数 以 你 喜 欢 的 任 何 顺序 检 索 这 些 配 对 。9.4.1 构 成 一 个 散 列 的 散 列你 可 以 用 下 面 方 法 创 建 一 个 匿 名 散 列 的 散 列 :%HoH = (flintstones => {251