Question

perl页面写ajax报错，提示未定义，但是已经引入了jq库

这是perl页面输出的html内容：
$op.=qq!<a class="b2b_bangd" id="test" onclick = "return comfirmsu(this)" ><font color='#556B2F'>【绑定】</font></a> !;
引入的js：<script language="javascript" src="/admin/js/ajax/jquery-3.2.0.slim.min.js"></script>
这是我写的ajax内容;
<script>
function comfirmsu(obj){
var ID = 100;
$.ajax({ type:'POST', url:'/admin/js/bd.pl', data:{'data_id':ID}, dataType:'json', success:function(res){ if(res.error == 1){ alert(1); }else{ alert(2333);
}
},
});
};
</script>

当前页面路径：
/cgishell/golden/admin/manage/ffp_acl.pl
点击绑定ajax按钮的按钮提示：
SyntaxError: expected expression, got '=' ffp_acl.pl:92:8
ReferenceError: comfirmsu is not defined
我这种写法有错么？有没可以给个demo我，perl+ajax的，本人刚刚从Php转perl新手

Answer 1

注意perl里面$要翻译变量，如果是perl输出script中的$符号，可能需要\$
看不出错误在哪里，可以支出错误的位置吗。

追问

我在perl当前页面写ajax，可以把数据提交到当前页面进行处理么？