Perl 语言编程 - Linux教程

-M'module qw(foo bar)' 的 一 个 缩 写 来 用 。 这 样 当 输 入 符 号 的 时 候 就 避 免 了引 号 的 使 用 。-Mmodule=foo,bar 生 成 的 实 际 的 代 码 是 :use module split(/,/, q{foo,bar})请 注 意 = 的 形 式 删 除 了 -m 和 -M 之 间 的 区 别 , 但 是 最 好 还 是 使 用 大 写 的形 式 以 避 免 混 淆 。你 可 能 只 会 在 真 正 的 Perl 命 令 行 调 用 的 时 候 使 用 -M 和 -m 开 关 , 而 不 会 在 #!封 装 的 选 项 行 上 用 。( 如 果 你 准 备 把 它 放 在 文 件 里 , 为 什 么 不 用 一 个 等 效 的 use或 者 no 代 替 呢 ?)-n 令 Perl 认 为 在 你 的 脚 本 周 围 围 绕 着 下 面 的 循 环 , 这 样 就 让 你 的 脚 本 遍 历 文 件 名参 数 , 就 象 sed -n 或 者 awk 做 的 那 样 :LINE:while() {... # 你 的 脚 本 在 这 里}你 可 以 在 你 的 脚 本 里 把 LINE 当 作 一 个 循 环 标 记 来 用 , 即 使 你 在 你 的 文 件 里 看不 到 实 际 的 标 记 也 如 此 。请 注 意 , 那 些 行 缺 省 的 时 候 并 不 打 印 。 参 阅 -p 选 项 看 看 如 何 打 印 。 下 面 是 一 个删 除 旧 于 一 周 的 文 件 的 有 效 方 法 :509