Manpages

• 在 短 的 單 行 塊 中

• 在 “複 合 ”下 標 周 圍

• 函 數 與 括 號 間 不 要 空 格

• 每 個 逗 號 後 打 空 格

• 長 句 子 在 操 作 符 後 截 斷

( "and" 和 "or" 除 外 ).

• 關 閉 括 號 後 打 空 格

• 相 關 項 之 間 以 列 對 齊

.

• 在 不 影 響 清 晰 的 情 況

下 儘 量 減 少 標 點 符 號 .

Larry 這 樣 做 當 然 有 他 的 原 因 , 不 過 他 沒 有 要 求 別 人 都 和 他 一 樣 . 以 下 意 見 供 您 參 考 :

法 , 你 應 該 選 擇 最 可 讀 的 一 種 . 例 如

open(FOO,$foo) ⎪⎪ die "Can’t open $foo: $!"; 好 於

die "Can’t open $foo: $!" unless open(FOO,$foo); 因 爲 第 二 種 辦 法 掩 蓋 了 句 子 中 的 主 要 內 容 。 另 一 方 面

print "Starting analysis\n" if $verbose; 好 於

$verbose && print "Starting analysis\n"; 因 爲 主 要 關 鍵 不 在 於 是 否 用 戶 輸 入 了 -v。 類 似 的 ， 因 爲 一 個 操 作 符 允 許 使 用 默 認 參 數 ， 不 意 味 着 你 必 須 使 用 默 認 值 。 默 認 值 是 爲 懶 惰 的 系 統 程 序 員 書 寫 只 運 行 一 次 的 程 序 準 備 的 。 如 果 你 需 要 你 的 程 序 儘 量 可 讀 ， 考 慮 給 出 參 數 。 根 據 相 同 的 原 則 ， 在 很 多 地 方 即 使 你 可 以 忽 略 括 號 也 不 意 味 着 你 應 當 這 樣 做 ：

    return print reverse sort num values %array;
    return print(reverse(sort num (values(%array))));如 果 有 疑 義 ， 使 用 括 號 。 至 少 它 使 得 可 憐 的 笨 蛋 能 在

vi 中 使 用 % 鍵 來 跳 轉 甚 至 你 沒 有 疑 義 的 時 候 ， 爲 那 個 將 來 維 護 你 的 代 碼 的 傢 伙 的 精 神 健 康 考 慮 一 下 吧 ， 並 且 他 有 可 能 把 括 號 放 錯 地 方 。

環 。 把 它 "縮 出 " 幾 格 以 利 於 察 看 :

    LINE:
        for (;;) {
            statements;
          last LINE if $foo;
            next LINE if /^#/;
            statements;}

例 .

了 它 們 的 返 回 值 . 使 用 它 們 是 爲 了 得 到 返 回 值 ， 否 則 ， 使 用 foreach() 或 是 system() 好 了 .

eval來 測 試 . 如 果 你 知 道 提 供 特 定 功 能 的 版 本 或 是 補 丁 , 你 可 以 察 看 $] (也 就 是 "English" 中 的 $PERL_VERSION) 來 確 定 當 前 的 版 本 . "Config" 模 塊 也 會 提 供 perl在 安 裝 時 Configure 程 序 測 得 的 值 .

$gotit 雖 然 沒 什 麼 不 好 , 但 是 用 下 劃 線 來 分 割 單 詞 可 以 增 加 可 讀 性 . 如 $var_names_like_this 好 於 $VarNamesLikeThis,對 不 以 英 語 爲 母 語 的 人 更 是 如 此 .同 樣 ， 在 使 用 VAR_NAMES_LIKE_THIS 時 也 要 遵 循 這 個 規 則 。 包 名 稱 有 時 不 遵 守 這 個 約 定 . Perl 爲 "pragma" 保 留 小 寫 的 包 名 稱 ， 比 如 integer 和 strict. 其 他 模 塊 名 稱 應 該 用 大 寫 字 母 開 始 ， 但 是 一 般 不 用 下 劃 線 來 分 隔 ， 因 爲 當 使 用 模 塊 名 來 作 文 件 名 時 ， 這 在 某 些 系 統 會 出 現 錯 誤 .

    $ALL_CAPS_HERE   常 量  (小 心 ！ 不 要 與  perl 變 量 衝 突 !)
    $Some_Caps_Here  包 作 用 域  global/static
    $no_caps_here    函 數 作 用 域  my() 或  local() 變 量函 數 和 方 法 名 多 用 小 寫

. 如 , $obj->as_string(). 用 下 劃 線 開 始 的 函 數 名 或 變 量 名 ， 表 示 該 函 數 或 變 量 只 能 在 定 義 它 的 包 中 使 用 .

其 中 有 很 多 斜 槓 或 反 斜 槓 時 ， 不 要 用 反 斜 槓 來 作 正 則 表 達 式 的 定 界 符 .

程 序 時 儘 量 少 用 "&"和 括 號 ， 可 以 把 子 程 序 當 做 函 數 或 列 表 操 作 符 來 調 用 .

    $IDX = $ST_MTIME;
    $IDX = $ST_ATIME       if $opt_u;
    $IDX = $ST_CTIME       if $opt_c;
    $IDX = $ST_SIZE        if $opt_s;

    mkdir $tmpdir, 0700 or die "can’t mkdir $tmpdir: $!";
    chdir($tmpdir)      or die "can’t chdir $tmpdir: $!";
    mkdir ’tmp’,   0777 or die "can’t mkdir $tmpdir/tmp: $!";

    opendir(D, $dir)     or die "can’t opendir $dir: $!";

    tr [abc]
       [xyz];