更改 $*DISTRO 值以进行测试

我需要测试一个功能包括这一行 https://github.com/rakudo/rakudo/commit/0a2eef8fb0adb24164999a2b71c415fd11fe748a#diff-4ce1542a6f014c9a003fe452abe8cac3R2161:

if $translate-nl && $*DISTRO.is-win

我尝试为 $*DISTRO 重新分配一个值，

$*DISTRO='Windows 10';

但它说：

Cannot modify an immutable Distro (debian (9.stretch))␤

$*DISTRO https://docs.perl6.org/language/variables#index-entry-%24%2ADISTRO是一个动态变量，它不被修改是有意义的。也就是说，是否有其他方法可以测试代码（当然，除了 Windows 之外）

my $*DISTRO = ...

希望不需要修改原来的内容。一般是不合理的远距离作用 https://en.wikipedia.org/wiki/Action_at_a_distance_(computer_programming)——如果有人将其设置为不可变的值，那么几乎可以肯定如此。这就是为什么全局变量 https://en.wikipedia.org/wiki/Global_variable名声如此糟糕。