use Data::Dumper; print Dumper $json;