我分享我自己的实验和观察的结果，希望它能有用，即使我的结论目前不是很积极。我对O.P.问题的简短回答是：截至2019年5月，这还是不可能的。
现在长答案是：Perl6的JVM后端支持在最新版本的Rakudo Star：https://rakudo.org/post/announce-rakudo-star-release-2019-03 中尚未处于稳定，即用型状态
无论如何，如果你想试试运气，这里有一个从rakudo-star/nqp/examples派生的例子（有一个小补丁，因为来自rakudo-star-2019.03的原始代码不会开箱即用）。对原始示例的改进还包括命令行参数的文档和基本控制：
package examples;
import org.perl6.nqp.runtime.*;
import static org.perl6.nqp.runtime.CallSiteDescriptor.*;
import org.perl6.nqp.sixmodel.*;
public class CallFromJava {
private GlobalContext g;
private ThreadContext t;
private SixModelObject nqpComp;
private CallFromJava(String bytecode, String hll) {
g = new GlobalContext();
t = g.getCurrentThreadContext();
Ops.loadbytecode(bytecode, t);
nqpComp = Ops.getcomp(hll, t);
}
private SixModelObject eval(String nqp) {
Ops.invokeDirect(t, Ops.findmethod(nqpComp, "compile", t),
new CallSiteDescriptor(new byte[] { ARG_OBJ, ARG_STR }, null),
new Object[] { nqpComp, nqp });
Ops.invokeDirect(t, Ops.result_o(t.resultFrame()), Ops.emptyCallSite, Ops.emptyArgList);
return Ops.result_o(t.resultFrame());
}
public static void main(String[] args) {
if (args.length != 3) {
System.err.printf("usage: java CallFromJava <jarfile> <dialect> <expression>\n");
System.err.println("<jarfile>: path to nqp.jar or perl6.jar");
System.err.println("<dialect>: nqp or perl6");
System.err.println("<expression>: a nqp or perl6 expression");
System.exit(1);
}
String jarFile = args[0];
String dialect = args[1];
String expression = args[2];
CallFromJava nqp = new CallFromJava(jarFile, dialect);
nqp.eval(expression);
}
}
如果您从 Rakudo Star 软件包（撰写本文时的版本 2019-03）中获取原始代码，请确保应用以下更正（在上面的示例中已修复）：
< Ops.invokeDirect(t, Ops.findmethod(t, nqpComp, "compile"),
---
> Ops.invokeDirect(t, Ops.findmethod(nqpComp, "compile", t),
生成并测试示例：
使用NQP（不完全是Perl）：
cd rakudo-star-yyyy-mm/nqp
javac -cp bin/ examples/CallFromJava.java
java -cp nqp-runtime.jar:3rdparty/asm/asm-4.1.jar:3rdparty/asm/asm-tree-4.1.jar:. examples.CallFromJava nqp.jar nqp 'say(2+2)'
4
问题在于 NQP 只是 Perl6 的一个子集，不适合 Perl6 开发人员直接使用。使用完整的Perl6，大概，人们会做这样的事情：
export PERL6_PREFIX=/usr/local/perl6 # or whatever your perl6 installation prefix is
cd rakudo-star-yyyy-mm/nqp
javac -cp bin/ examples/CallFromJava.java
java -cp $PERL6_PREFIX/share/nqp/runtime/asm-4.1.jar:$PERL6_PREFIX/share/nqp/runtime/asm-tree-4.1.jar:$PERL6_PREFIX/share/nqp/runtime/nqp-runtime.jar:$PERL6_PREFIX/share/perl6/runtime/rakudo-runtime.jar:$PERL6_PREFIX/share/perl6/runtime/perl6.jar:. examples.CallFromJava $PERL6_PREFIX/share/perl6/runtime/perl6.jar perl6 'say 2 + 2'
但到目前为止，我没有设法让它工作
Unhandled exception: java.nio.file.NoSuchFileException: Perl6/Grammar
in <anon> (src/vm/jvm/ModuleLoader.nqp:76)
in load_module (src/vm/jvm/ModuleLoader.nqp:58)
in <anon> (gen/jvm/main.nqp)
