perl的hash转json后按key排序

    my $json = new JSON;
    $json->canonical(1);
    my $response = $json->encode($var);
请使用浏览器的分享功能分享到微信等