在perl中将数组转换为json,获取字符串数组

前端之家收集整理的这篇文章主要介绍了在perl中将数组转换为json,获取字符串数组前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
我正在尝试将数组转换为json:


   $json = to_json("numbers_array" => \@numbers_array);
   print $json;

但我得到的输出是:

  {"numbers_array" => ["1","2","3"] }

我正在使用push()添加元素来构建数组.如何转换为json并保留数字类型,以便输出为:

  {"numbers_array" => [1,2,3]}

谢谢!

解决方法

JSON documentation

You can force the type to be a number by numifying it:

my $x = "3"; # some variable containing a string
   $x += 0;     # numify it,ensuring it will be dumped as a number
   $x *= 1;     # same thing,the choice is yours.

我会尝试这样的事情:

$json = to_json({numbers_array => [map { $_ + 0 } @numbers_array]});
    print $json;

猜你在找的Perl相关文章