使用Perl模塊JSON創建JSON對象

Question

我在嘗試創建JSON對象以返回jQuery請求時花了很多時間。

我正在嘗試使用jQuery鏈式選擇模塊

並且我正在嘗試使用Perl的JSON模塊創建JSDN對象。

我不知道我在做什么錯或者我怎么能調試它，關於我能做的最好的就是得到一個JS對話框，提示“一個未知錯誤...。”。

這就是我創建JSON對象時要做的所有事情，我認為這就是所需要的，但不是必須的。 有任何想法嗎？

TIA

use JSON;
my %data = (1 => 'val1',
            2 => 'val2',
            3 => 'val3',
           );
my $json_text = to_json(\%data);
print $json_text;

Answer 1

運行腳本可以得到：

{"1":"val1","3":"val3","2":"val2"}

…這是預期的輸出。

幾乎可以肯定，問題在於您使用什么代碼從服務器到客戶端獲取JSON。

Answer 2

在處理到文本區域之前，讓javascript輸出響應文本，這樣您就可以查看傳輸是否失敗。 另外，您將需要在數據前放置一些內容，例如“ myVar =”，以便將數據分配給另一端的內容。

Answer 3

看起來您已經解決了問題，並且是否想知道為什么它不起作用是因為在較舊版本的JSON模塊中，to_json方法未從JSON.pm導出。 CPAN（2.0）上的最新版本將to_json導出到您的命名空間中，但是〜1.5版本不需要，並且需要JSON ::。 許多存儲庫仍帶有此舊版本，如果您在CentOS〜5.3或Fedora Core的舊版本上運行，則將具有舊的JSON.pm。