Perl 语言编程 - Linux教程

符 ) 可 以 用 于 在 真 正 的 文 件 结 束 符 之 前 表 示 脚 本 的 逻 辑 结 束 。 任 何 后 面 的 文 本 都 被 忽 略 , 不过 可 以 通 过 DATA 文 件 句 柄 读 取 。DATA 记 号 的 作 用 类 似 END 记 号 , 不 过 它 是 在 当 前 包 的 名 字 空 间 打 开 DATA 文 件 句柄 , 因 此 你 所 require 的 所 有 文 件 可 以 同 时 打 开 , 每 个 文 件 都 拥 有 自 己 的 DATA 文 件 句柄 。 更 多 信 息 请 看 第 二 十 八 章 里 的 DATA。2.7 环 境到 现 在 为 止 , 我 们 已 经 看 到 了 一 些 会 产 生 标 量 值 的 项 。 在 我 们 进 一 步 讨 论 项 之 前 , 我 们 要 先讨 论 带 环 境 (context) 的 术 语 。2.7.1 标 量 和 列 表 环 境你 在 Perl 脚 本 里 激 活 的 每 个 操 作 ( 注 : 这 里 我 们 用 “ 操 作 ” 统 称 操 作 符 或 项 。 当 你 开 始 讨 论那 些 分 析 起 来 类 似 项 而 看 起 来 象 操 作 符 的 函 数 时 , 这 两 个 概 念 间 的 界 限 就 模 糊 了 。) 都 是 在特 定 的 环 境 里 进 行 的 , 并 且 该 操 作 的 运 转 可 能 依 赖 于 那 个 环 境 的 要 求 。 存 在 两 种 主 要 的 环 境 :标 量 和 列 表 。 比 如 , 给 一 个 标 量 变 量 , 一 个 数 组 或 散 列 的 标 量 元 素 赋 值 , 在 右 手 边 就 会 以 标量 环 境 计 算 :$x = funkshun(); # scalar context$x[1]= funkshun(); # scalar context$x{"ray"} = funkshun(); # scalar context但 是 , 如 果 给 一 个 数 组 或 者 散 列 , 或 者 它 们 的 片 段 赋 值 , 在 右 手 边 就 会 以 列 表 环 境 进 行 计 算 ,即 便 是 该 片 段 只 选 出 了 的 一 个 元 素 :@x@x[1]= funkshun(); # list context= funkshun(); # list context@x{"ray"} = funkshun(); # list context%x = funkshun(); # list context即 使 你 用 my 或 our 修 改 项 的 定 义 , 这 些 规 则 也 不 会 改 变 :my $xmy @x= funkshun(); # scalar context= funkshun(); # list context69