在哪里可以找到用于将Perl数据结构转换为JavaScript数据结构的Perl模块？

在哪里可以找到用于将Perl数据结构转换为JavaScript数据结构的Perl模块？

这是我的代码(梅森):

% # convert our @cti data structure into a javascript one
  var cti = [
% foreach my $cti_category (@cti) {
             {
                 label: "<% $cti_category->{'label'} %>",
                 value: "<% $cti_category->{'value'} %>",
                 children: [
%     foreach my $cti_type (@{$cti_category->{'children'}}) {
                            {
                              label: "<% $cti_type->{'label'} %>",
                              value: "<% $cti_type->{'value'} %>",
                            },
%     }
                           ]
             },
% }
            ];

有这个模块吗？

JSON代表JavaScript Object Notation,这是您正在寻找的格式.

不幸的是,您正在寻找的模块都不在Perl核心中,但它们可以在CPAN上使用,因为快速搜索会显示出来.

我实际上建议安装JSON :: Any作为包装器,以及JSON :: XS(如果你有一个C编译器)或JSON和JSON :: Syck之一,如果你没有.JSON :: Any 在几个其他JSON模块之上提供了一个接口类(您可以选择,或者让它从已安装的内容中选择),这与​​您最终使用的模块无关.这样,如果你的代码需要移植到其他地方,并且(比方说)目标机器可以在你不能的时候安装JSON :: XS,你可以在没有任何额外代码的情况下获得性能提升.

use JSON::Any;

my $j = JSON::Any->new;

$json = $j->objToJson($perl_data);

像这样.

查看JSON或JSON :: XS.

为了详细说明,JSON是"JavaScript Object Notation",上面的两个模块将perl数据结构转换为该格式.