Perl 语言编程 - Linux教程

while 和 until 修 饰 词 重 复 计 算 。 如 你 所 想 ,while 修 饰 词 将 不 停 地 执 行 表 达 式 , 只 要 表达 式 的 值 为 真 , 或 者 until 里 只 要 表 达 式 为 假 则 不 断 执 行 表 达 式 。$expresion++ while -e "$file$expression";kiss('me') until $I_die;foreach 修 饰 词 ( 也 拼 为 for) 为 在 其 LIST 里 的 每 个 元 素 计 算 一 次 , 而 $_ 是 当 前 元 素的 别 名 :s/java/perl/ for @resumes;print "field: $_ \n" foreach split /:/, $dataline;while 和 until 修 饰 词 有 普 通 的 while 循 环 的 语 意 ( 首 先 计 算 条 件 ), 只 有 用 于 do BLOCK( 或 者 现 在 已 经 过 时 的 do SUBROUTINE 语 句 ) 里 是 个 例 外 , 在 此 情 况 下 , 在 计 算 条 件之 前 , 先 执 行 一 次 语 句 块 。 这 样 你 就 可 以 写 下 面 这 样 的 循 环 :do {$line = ...} until $line eq ".\n"参 考 第 二 十 九 章 , 函 数 , 里 的 三 种 不 同 的 do 入 口 , 还 请 注 意 我 们 稍 后 讲 的 循 环 控 制 操 作符 在 这 个 构 造 中 无 法 使 用 , 因 为 修 饰 词 不 接 受 循 环 标 记 。 你 总 是 可 以 在 它 周 围 放 一 些 额 外 的( 花 括 弧 ) 块 提 前 结 束 它 , 或 者 在 其 内 部 放 先 行 运 行 —— 就 象 我 们 稍 后 将 在 “ 光 块 ” 里 描 述 的那 样 。 或 者 你 可 以 写 一 个 内 部 带 有 多 重 循 环 控 制 的 真 正 的 循 环 。 说 到 真 正 的 循 环 , 我 们 下 面要 谈 谈 混 合 语 句 。4.2 混 合 语 句在 一 个 范 围 ( 注 : 范 围 和 名 字 空 间 在 第 二 章 , 集 腋 成 裘 , 里 描 述 , 在 “ 名 字 ” 节 ) 里 的 一 个 语句 序 列 称 之 为 一 个 块 。 有 时 候 , 范 围 是 整 个 文 件 , 比 如 一 个 required 文 件 或 者 包 含 你 的主 程 序 的 那 个 文 件 。 有 时 候 , 范 围 是 一 个 用 eval 计 算 的 字 串 。 但 是 , 通 常 来 说 , 一 个 块是 一 个 用 花 括 弧 ({}) 包 围 的 语 句 体 。 当 我 们 说 到 范 围 的 时 候 , 我 们 的 意 思 就 是 上 面 三 种之 一 。 当 我 们 说 一 个 带 花 括 弧 的 块 时 , 我 们 会 用 术 语 BLOCK。113