Perl 语言编程 - Linux教程

}}在 这 个 例 子 里 , 我 们 的 两 维 数 组 @newAoA 里 的 每 个 独 立 的 数 值 都 是 一 个 一 个 地 从 一 个 两维 数 组 @AoA 中 取 出 来 赋 值 的 。 另 外 一 个 方 法 是 创 建 一 个 匿 名 数 组 , 每 个 由 一 个 @AoA中 我 们 要 的 子 数 组 组 成 , 然 后 然 后 把 指 向 这 些 匿 名 数 组 的 引 用 放 到 @newAoA 中 。 然 后 我们 就 可 以 把 引 用 写 到 @newAoA ( 也 是 脚 标 , 只 是 这 么 说 而 已 ), 而 不 用 把 一 个 子 数 组 值写 到 两 维 数 组 @newAoA 中 。 这 个 这 个 方 法 消 除 了 内 层 的 循 环 :for ($x = 4; $x