为什么Perl中可以对后自增表达式取引用，却不能对前自增表达式取引用？

核心原理 #

你观察到的输出差异本质是前后自增运算符返回值的属性不同，属于Perl的刻意设计，并非实现缺陷。

官方文档说明 #

Perl官方运算符文档perlop中对自增/自减运算符的返回逻辑有明确界定：

后自增$var++返回变量自增前的原始值，为了返回旧值，运算过程中会创建独立的临时标量副本存储旧值，返回的是这个副本的右值，无法关联到原变量。前自增++$var返回变量自增后的新值，运算后直接返回原变量本身的别名，属于合法左值。

代码执行逻辑拆解 #

你给出的测试代码运行过程如下：

% perl -e '$i = 9; $p = \$i++; $q = \++$i; $i = "WTF"; print "$$p $$q\n"'
9 WTF

1. 首先初始化$i = 9
2. 执行$p = \$i++时：
   • 先创建$i当前值9的临时标量副本
   • 原$i完成自增变为10
   • 取址符\获取的是这个独立临时副本的地址，后续原$i的任何修改都不会影响该副本，因此$$p固定为9
3. 执行$q = \++$i时：
   • 原$i先完成自增变为11
   • 前自增直接返回原$i的别名
   • 取址符\获取的是原$i本身的地址，因此后续修改$i为"WTF"时，$$q会同步变更为新值

补充说明 #

你提到的“Perl中的前自增和后自增都不能作为左值使用”是常见认知误区：只有后自增返回的临时右值无法作为左值，前自增返回的原变量别名是合法左值，你可以通过代码++$i = 20; print $i验证，执行后会输出20，而尝试对后自增结果赋值会直接抛出语法错误。
该逻辑同样适用于自减运算符，且从Perl 5的早期版本开始就保持一致，属于稳定的语言特性。

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