相关疑难解决方法(0)

我收到了这个错误

Argument "\\x{61}" isn't numeric in numeric comparison (<=>)

从

#!/usr/bin/perl

use JSON::PP;
use utf8;
use strict;
use warnings;
use Data::Dumper;

my $json = JSON::PP->new->allow_nonref;
$json = $json->utf8;

my $data = {
        12 => {
                a => 1,
                b => 2,
        },
        1 => {
                    x => 3,
        },
        2 => {
                z => 4,
        }
};

my $json_string = $json->sort_by(sub { $JSON::PP::a <=> $JSON::PP::b })->encode($data);

假设将散列编码为json字符串,然后对键进行数字排序12 1 2.

如果问题可以通过另一个JSON解析器解决,那么这将完全没问题=)

怎么了？