perl6 – 在分配给Perl 6程序之前使用Perl 6程序中的变量

发布时间：2020-12-15 23:26:07 所属栏目：大数据来源：网络整理

导读：我想用我的程序将文字分配给文件末尾的一些变量,但是要先使用这些变量.我想出来的唯一方法是： my $text;say $text;BEGIN { $text = "abc";} 是否有更好/更惯用的方式？解决方法只是去功能. 改为创建子程序： say text();sub text { "abc" } 更新(谢谢raip

我想用我的程序将文字分配给文件末尾的一些变量,但是要先使用这些变量.我想出来的唯一方法是：

my $text;

say $text;

BEGIN {    
    $text = "abc";
}

是否有更好/更惯用的方式？

解决方法

只是去功能.

改为创建子程序：

say text();

sub text { "abc" }

更新(谢谢raiph！收集您的反馈,包括使用term:<>的参考)：

在上面的代码中,我最初省略了对文本调用的括号,但是总是包含它们以防止解析器误解我们的意图会更容易维护.例如,

say text();          # "abc" 
say text() ~ text(); # "abcabc"
say text;            # "abc",interpreted as: say text()
say text ~ text;     # ERROR,interpreted as: say text(~text())

sub text { "abc" };

为避免这种情况,您可以将文本设为term,这有效地使裸字文本的行为与text()相同：

say text;        # "abc",interpreted as: say text() 
say text ~ text; # "abcabc",interpreted as: say text() ~ text()

sub term:<text> { "abc" };

对于编译时优化和警告,我们也可以添加pure trait(感谢Brad Gilbert！).纯粹断言,对于给定的输入,函数“always produces the same output without any additional side effects”：

say text;        # "abc",interpreted as: say text() ~ text()

sub term:<text> is pure { "abc" };

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!