Windows批处理向Perl程序传递含空格参数的问题及修正

原批处理运行后出现参数拆分的问题，核心原因是Windows批处理的for循环默认将空格、逗号、分号等作为元素分隔符——即使变量中包含引号，这些引号会被视为普通字符，导致带空格/逗号的年龄区间字符串被拆分成多个片段传递给Perl脚本。

以下是两种简洁的修改方案：

方案一：变量替换实现带引号的元素遍历 #

修改后的批处理代码：

@echo off
set GENDER_LIST=M F
set AGE_GROUP_LIST=[20, 30) [30, 40)

for %%G in (%GENDER_LIST%) do (
    for %%A in ("%AGE_GROUP_LIST: =" "%") do (
        perl argvSample.pl "%%G %%~A"
        echo ---------------
    )
)

关键说明： #

1. 调整AGE_GROUP_LIST定义，去掉内部引号，仅保留年龄区间字符串；
2. 使用批处理变量替换语法%AGE_GROUP_LIST: =" "%，将原变量中的空格替换为" "，把[20, 30) [30, 40)转换为"[20, 30)" "[30, 40)"；
3. for %%A循环会将每个带引号的年龄区间当作完整元素，避免拆分；
4. %%~A用于去掉元素外层的引号，再与性别拼接后传递给Perl脚本。

方案二：直接在for循环中定义带引号的元素 #

如果年龄区间不需要动态生成，可直接在循环中写带引号的元素：

@echo off
set GENDER_LIST=M F

for %%G in (%GENDER_LIST%) do (
    for %%A in ("[20, 30)" "[30, 40)") do (
        perl argvSample.pl "%%G %%~A"
        echo ---------------
    )
)

关键说明： #

直接在for %%A的in子句中用引号包裹每个年龄区间，强制批处理将其视为单个完整元素，不会被空格/逗号拆分。

运行任意一种修改后的批处理，即可得到符合预期的输出：

"M [20, 30)"
---------------
"M [30, 40)"
---------------
"F [20, 30)"
---------------
"F [30, 40)"
---------------

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