替代：替换评估答案

【问题标题】：Substitute: replacement evaluation替代：替换评估
【发布时间】：2019-04-20 06:46:13
【问题描述】：

如果替换是在变量中传递的，那么第一个和第二个替换是否等效？

#!/usr/bin/env perl6
use v6;

my $foo = 'switch';
my $t1 = my $t2 = my $t3 = my $t4 = 'this has a $foo in it';

my $replace = prompt( ':' ); # $0

$t1.=subst( / ( \$ \w+ ) /, $replace );
$t2.=subst( / ( \$ \w+ ) /, { $replace } );
$t3.=subst( / ( \$ \w+ ) /, { $replace.EVAL } );
$t4.=subst( / ( \$ \w+ ) /, { ( $replace.EVAL ).EVAL } );

say "T1 : $t1";
say "T2 : $t2";
say "T3 : $t3";
say "T4 : $t4";

# T1 : this has a $0 in it
# T2 : this has a $0 in it
# T3 : this has a $foo in it
# T4 : this has a switch in it

【问题讨论】：

标签： replace eval raku subst

【解决方案1】：

$replace 和{$replace} 的唯一区别是第二个是返回变量值的块。它只是增加了一个间接级别，但结果是一样的。更新：根据@raiph 的 cmets 编辑。

【讨论】：

我很好奇你为什么写“返回变量本身”。我认为它具有误导性，并且经过反思，不明白您为什么不写“返回值”，这就是实际发生的情况。在my $replace = 99; sub term:<foo> () is rw { $replace }; foo = 42; say $replace; # 42 中，{ $replace } 中的$replace 确实产生变量本身，而不是值，并且块返回变量本身，而不是它包含的值。但是在 sid 的示例中的 { $replace } 中，$replace 产生变量的 value，因此该块也返回该 value，而不是变量本身。跨度>
@raiph 没错，返回值；在您的示例中，它实际上将一个可写容器返回到变量中。反正我会改的。
您的编辑在 imo 上仍然很奇怪。当变量（容器）无关紧要时，为什么要提到“变量本身”？这与42 和{ 42 } 之间的区别完全相同。 “在您的示例中，它实际上将一个可写容器返回到变量中”在我的示例中它们本质上是相同的。 my $replace = 99; sub term:<foo> () is rw { $replace }; say $replace.WHERE == foo.WHERE; # True。符号$replace 绑定到my 中的新容器。然后is rw 告诉P6 将{ $replace } 中的$replace 解释为容器（变量），而不是它所持有的值。