perl -MJSON -we 'local $/; print JSON->new->pretty->canonical->encode(decode_json(<>))'