TL;DR use JSON::PP JSON::PP->new->utf8->canoical(1)->encode(...) すればkeyのalphabet順になる refs: http://stackoverflow.com/questions/3532067/perl-how-to-sort-a-json-structure-on-something-other-than-root-key-attributes はじめに クライアン…

package main import ( "bytes" "encoding/json" "fmt" ) func main() { b := []byte(`{"foo": "bar", "hoge": {"fuga": "hoga"}}`) dec := json.NewDecoder(bytes.NewReader(b)) var jsonData interface{} dec.Decode(&jsonData) fmt.Println(jsonData) fmt…

嵌ったコード use Furl; … my $furl = Furl->new; my $args = { höge => ‘fuga’, piyp => ‘puyo’ }; $furl->post( $url, [], $args ); 解決したコード use Furl; use JSON::XS; … my $furl = Furl->new; my $args = { höge => ‘fuga’, piyp => ‘puyo’ }; $fu…