Perl 语言编程 - Linux教程

$double =qq(can't we get some "good" $variable?);$chunk_of_code = q {if ($condition) {print "Gotcha!";}};最 后 一 个 例 子 表 明 , 你 可 以 在 引 起 声 明 字 符 和 其 起 始 包 围 字 符 之 间 使 用 空 白 。 对 于 象 s///和 tr/// 这 样 的 两 元 素 构 造 而 言 , 如 果 第 一 对 引 起 是 括 弧 对 , 那 第 二 部 分 获 取 自 己 的 引 起 字符 。 实 际 上 , 第 二 部 分 不 必 与 第 一 对 一 样 。 所 以 你 可 以 用 象 s(bar) 或 者 tr(a-f)[A-f] 这 样的 东 西 。 因 为 在 两 个 内 部 的 引 起 字 符 之 间 允 许 使 用 空 白 , 所 以 你 可 以 把 上 面 最 后 一 个 例 子 写做 :tr (a-f)[A-F];不 过 , 如 果 用 # 做 为 引 起 字 符 , 就 不 允 许 出 现 空 白 。q#foo# 被 分 析 为 字 串 'foo', 而 q#foo# 引 起 操 作 符 q 后 面 跟 着 一 个 注 释 。 其 分 隔 符 将 从 下 一 行 获 取 。 在 两 个 元 素 的 构 造中 间 也 可 以 出 现 注 释 , 允 许 你 这 样 写 :s{foo}{bar}# 把 foo# 换 为 bar。tr [a-f][A-F];# 把 小 写 十 六 进 制# 换 为 大 写2.6.4 要 么 就 完 全 不 管 引 起一 个 语 法 里 没 有 其 他 解 释 的 名 字 会 被 当 作 一 个 引 起 字 串 看 待 。 我 们 叫 它 们 光 字 。( 注 : 我 们认 为 变 量 名 , 文 件 句 柄 , 标 签 等 等 不 是 光 字 , 因 为 它 们 有 被 前 面 的 或 后 面 的 ( 或 两 边 的 ) 语句 强 制 的 含 义 。 预 定 义 的 名 字 , 比 如 子 过 程 , 也 不 是 光 字 。 只 有 分 析 器 丝 毫 不 知 的 东 西 才 是63