这与this question on accesing the POD有关,但远远不止于此。您可以使用以下方式easily access the Abstract Syntax Tree of a Perl 6 program:
perl6 --target=ast -e '"Þor is mighty!".say'
这将打印整个Q抽象语法树。目前尚不清楚如何从您自己的程序中做到这一点,或者我还没有找到如何做到这一点。实际上,the
CoreHackers::Q
module将其作为外部脚本运行。但是能够从您自己的程序访问它,例如use QAST; # It does not exist
my $this-qast = QAST::Load("some-external-file.p6") # Would want something like this
会很好。我非常确定应该有可能在NQP级别,并且可能以依赖Rakudo的方式。有人知道热吗?
最佳答案
由于QAST不是Perl 6语言规范的一部分,而是Rakudo的内部实现细节,因此没有官方的方法可以做到这一点。最终将有一个AST形式,它是语言规范的一部分,但尚不存在(正在研究该领域的007项目)。
但是,可以使用以下方法获得QAST树:
use nqp;
my $ast = nqp::getcomp("perl6").eval("say 42", :target<ast>);
say $ast.dump();