Bash脚本中Perl单行文本替换命令的执行结果校验问题求助

让我们一步步解决你的问题，核心是两个关键点：Bash语法错误和Perl命令的返回值逻辑。

问题分析 #

你的脚本有两个主要问题：

1. 函数调用的语法错误：在if判断里调用函数时，错误地使用了[ ]（这是test命令的语法），正确的做法是直接调用函数名。
2. Perl命令的默认返回值不精准：Perl的-pi选项即使没有匹配/替换任何内容，也会返回退出码0（表示成功），导致你无法区分“命令执行成功但无替换”和“命令执行成功且完成替换”两种情况。

修正后的完整脚本 #

#!/bin/bash
export CLI_CWD="$PWD"

site_variables() {
    # 直接返回文件是否存在的判断结果，更简洁
    [ -f "$CLI_CWD/variables.php" ]
}

run_command() {
    perl -pi -e '
        # 统计三次替换的总次数
        $count += s/(dbuser)(\s+)\=\s.*;$/\1 = Config::get("db")["user"];/;
        $count += s/(dbpass)(\s+)\=\s.*;$/\1 = Config::get("db")["pass"];/;
        $count += s/(dbname)(\s+)\=\s.*;$/\1 = Config::get("db")["database"];/;
        # 如果总替换次数为0，返回退出码1；否则返回0
        END { exit $count == 0 ? 1 : 0 }
    ' "$CLI_CWD/variables.php"
}

replace_variables() {
    # 直接调用函数作为if的判断条件，无需[ ]
    if run_command; then
        echo "Updated variables.php successfully"
    else
        echo "Did not update variables.php (no matches found or command failed)" >&2
    fi
}

# 同样，直接调用函数判断文件是否存在
if site_variables; then
    replace_variables
else
    >&2 echo "Current directory ($(pwd)) is not a project root directory"
    exit 4
fi

关键修改点说明 #

1. 修正函数调用的语法 #

原来的if [ site_variables ];和if [run_command ];都是错误的：

• [ ]是Bash的test命令，用于条件判断（比如文件存在、字符串比较等），不是用来调用函数的。
• 正确的写法是直接写函数名：if site_variables; 和 if run_command;，这样Bash会执行函数并根据函数的退出码判断真假（退出码0为真，非0为假）。

2. 让Perl返回精准的退出码 #

我们修改了Perl脚本，添加了：

• 一个$count变量，统计三次正则替换的总次数。
• 在END块中，根据$count的值决定退出码：如果没有任何替换（$count == 0），就返回1（表示失败/无修改）；否则返回0（表示成功/完成修改）。
  这样Bash就能准确判断Perl命令是否真的修改了文件。

3. 简化site_variables函数 #

原来的函数可以简化为直接返回[ -f ... ]的结果，因为[命令本身的退出码就是0（文件存在）或1（文件不存在），无需额外的return语句。

4. 错误输出重定向到stderr #

把错误提示信息（比如“未找到文件”“未完成替换”）重定向到标准错误流（>&2），这是Shell脚本的最佳实践，便于区分正常输出和错误信息。

测试验证 #

当variables.php存在且包含目标内容时，脚本会输出成功信息并完成替换；如果文件存在但没有匹配的内容（比如已经是修改后的状态），脚本会输出错误提示；如果文件不存在，脚本会提示当前目录不是项目根目录并退出。

内容的提问来源于stack exchange，提问作者John David