Perl 5中printf位置参数使用异常问题排查求助

核心错误：变量赋值语法误用 #

你代码里的my $i, $j = 10, 20;并非同时给$i和$j赋值10、20。Perl的语法规则中：

• my声明了$i和$j两个变量，但赋值操作仅作用于最后一个变量$j，且10, 20里的20会被直接丢弃，最终$j被赋值为10。
• $i仅被声明未初始化，默认值为undef，当用%d格式化时，Perl会将undef转为0，这就是输出里i = 0的原因。

修正方案 #

改用列表赋值语法，用括号包裹变量列表和值列表，实现逐个对应赋值：

$ perl -e 'my ($i, $j) = (10, 20); printf "i = %1\$d, j = %2\$d, i again = %1\$d, j again = %2\$d\n", $i, $j;'

执行后输出符合预期：

i = 10, j = 20, i again = 10, j again = 20

补充说明 #

• Perl中，只有当my后跟随括号包裹的变量列表，同时赋值端也是括号包裹的列表时，才会按顺序将值分配给对应变量。
• 未初始化的标量在数值上下文（如整数格式化）中会被Perl默认转换为0。

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