java - 为内联启动 JVM

Question

我有一个使用 Inline::Java 的 Perl 脚本只是有到fork (它是一个服务器，我希望它同时处理多个连接)。

所以我想实现this solution它与 SHARED_JVM => 1 一起使用共享 JVM .由于脚本退出时 JVM 没有关闭，我想用 START_JVM => 0 重用它.但是因为这可能只是我第一次启动服务器，所以我也想有一个 BEGIN在调用 use Inline 之前阻止确保 JVM 正在运行.

我的问题很简单，但我在网上找不到任何答案:How do I simply start a JVM?我看过 man java并且似乎没有任何选项表示“启动并仅监听连接”。

这是我在 Perl 中尝试做的事情的简化版本，如果这有帮助的话:

BEGIN {
    &start_jvm unless &jvm_is_running;
}

use Inline (
    Java       => 'STUDY',
    SHARED_JVM => 1,
    START_JVM  => 0,
    STUDY      => ['JavaStuff'],
);

if (fork) {
    JavaStuff->do_something;
    wait;
}
else {
    Inline::Java::reconnect_JVM();
    JavaStuff->do_something;
}

我需要帮助的是编写 start_jvm子程序。

Answer 1

如果您有一个有效的 jvm_is_running 函数，只需使用它来确定 Inline::Java 是否应该启动 JVM。

use Inline (
    Java       => 'STUDY',
    SHARED_JVM => 1,
    START_JVM  => jvm_is_running() ? 0 : 1,
    STUDY      => ['JavaStuff'],
);