有没有办法检查LWP :: UserAgent是否可以使用？
例如$(function () {
$("#upload").bind("click", function () {
var regex = /^([a-zA-Z0-9\s_\\.\-:])+(.csv|.txt)$/;
if (regex.test($("#fileUpload").val().toLowerCase())) {
if (typeof (FileReader) != "undefined") {
var reader = new FileReader();
reader.onload = function (e) {
//var table = $("<table id='name'/>");
var lines = e.target.result.split("\n");
//alert(lines);
var result = [];
var headers = lines[0].split(",");
for (var i = 1; i < headers.length; i++) {
var header = headers[i];
header = header.replace(/(\r\n|\n|\r)/gm, "");
headers[i] = header;
}
for (var i = 1; i < lines.length; i++) {
var obj = {};
var currentline = lines[i].split(",");
//alert(currentline);
for (var j = 0; j < headers.length; j++) {
obj[headers[j]] = currentline[j];
//alert(obj[headers[j]]);
}
result.push(obj);
//alert(JSON.stringify(result));
}
//alert(result[0].NAME + ' '+ result[0].ADDRESS+" "+result[0].CITY);
populateTable(result);
document.getElementById("cancel").style.visibility = "visible";
document.getElementById("process").style.visibility = "visible";
document.getElementById("filterDev").style.visibility = "visible";
}
reader.readAsText($("#fileUpload")[0].files[0]);
}
}
});
});
$(function () {
$("#process").bind("click", function () {
document.getElementById("File1").style.visibility = "visible";
document.getElementById("File2").style.visibility = "visible";
});
});
function populateTable(finalObject) {
var obj = finalObject;
var table = $("<table id='my-table' />");
table[0].border = "1";
var columns = Object.keys(obj[0]);
columns.unshift('');
//alert(columns);
var columnCount = columns.length;
var row = $(table[0].insertRow(-1));
for (var i = 0; i < columnCount; i++) {
var headerCell = $("<th />");
headerCell.html([columns[i]]);
row.append(headerCell);
}
$.each(obj, function (i, obj) {
row = '<tr data-id="' + obj.ID + '"><td><input type="checkbox"/></td><
var dvTable = $("#dvCSV");
dvTable.html("");
dvTable.append(table);
}
请求的响应code可能总是返回get，而500中的消息可能是status_line }。
答案 0 :(得分：4)
看起来你的Perl安装有点破碎。 重试请求无法解决问题。
此错误消息来自XSLoader。 The ExtUtils::MakeMaker toolchain documentation解释了这一点：
XS代码对模块版本号非常敏感，如果Perl模块中的版本号不匹配，则会抱怨。如果更改模块的版本＃而不重新运行Makefile.PL，旧的版本号将保留在Makefile中，导致使用错误的编号构建XS代码。
XSLoader distribution brings a unit test以确保发生这种情况。
在您的留言中
500 HTML :: Parser对象版本3.35与bootstrap参数3.72
不匹配
它表示您的HTML::Parser Perl模块版本为3.35，但它尝试加载版本为3.72的XS库（这是当前版本）。 In line 11 of HTML::Parser XSLoader::load('HTML::Parser', $VERSION) $VERSION，正确地将UPDATE TOP定义为3.72。这应该有用。
目前尚不清楚你在做什么，以及你正在使用哪些模块，但我建议你重新安装HTML :: Parser。除非你添加更多信息，否则我不能多说。
我通过使用grep.cpan.me找到了这个，它允许你在CPAN上的所有文件中grep。我搜索了does not match bootstrap parameter。