javascript - 有没有非常简单的方法使用jQuery/AJAX在Perl Dancer中更新页面？

我的主要Dancer应用程序.pm中包含以下代码：

package Deadlands;
use Dancer ':syntax';
use Dice;

our $VERSION = '0.1';

get '/' => sub {
    my ($dieQty, $dieType, $bonus);
    my $button = param('button');
    $dieQty = param('dieQty');
    $dieType = param('dieType');
    $bonus = param('bonus');
    if (defined $dieQty && defined $dieType) {
        return Dice::Dice->new(dieType => $dieType, dieQty => $dieQty, bonus => $bonus)->getStandardResult();
    }
    template 'index';
};

true;

这是我的JavaScript：

$(document).ready(function() {
     $('#standardRoll').click(function() {
          $.get("/lib/Deadlands.pm", { button: '1', dieType: $("#dieType").val(), dieQty: $("#dieQty").val(), bonus: $("#bonus").val() }, processData);
          function processData(data) {
               $("#result").html(data);
          }
     });
});

我的网页中有一个result的div，我想使用Perl的冲模结果进行更新。当我按下“提交”按钮时，舞者在命令窗口中不断出现404错误。

最佳答案

/lib/Deadlands.pm必须是您的route的URL（在这种情况下，可能是/），而不是Perl模块的文件系统路径。