使用Perl的Dancer分叉在子进程中运行代码

Question

我在perl中有一个处理get / post请求的Dancer应用程序。

我的一个示例路线如下：

post '/handle_data' => sub {

    # perform some calculations
    ...
    # store some data
    ...
    # do some long running tasks
    ...
};

我的问题：是否有一种简单的方法可以在不阻止请求的情况下在另一个进程中执行长时间运行的任务

我已经在父进程中尝试fork and return ，在子进程的长时间运行任务之后exit ，但是这一切似乎都阻止了在子进程完成之前发送的响应。

任何帮助表示赞赏。

编辑：

我最终切换到一个成熟的作业服务器，特别是Gearman的perl版本

Answer 1

fork和return似乎对我有用。

我试过了：

#!/usr/bin/perl

use Dancer;

get '/' => sub {
    fork and return "Content!\n";

    sleep 10; # do your actual work here
    warn "Child process done\n";
    exit;
};

dance;

通过独立服务器或通过plackup / Starman运行它，按预期工作 - “Content！\\ n”立即返回给用户的浏览器，请求结束; 分叉的过程会暂停十秒钟，然后发出警告（在终端上可见）然后退出。