{"issue":{"state":"closed","created_at":"2011-12-12T14:02:56Z","updated_at":"2011-12-12T15:57:45Z","comments":2,"user":{"gravatar_id":"831e081157e831d871d3b61c7a284b53","id":538980,"url":"https://api.github.com/users/unera","avatar_url":"https://secure.gravatar.com/avatar/831e081157e831d871d3b61c7a284b53?d=https://a248.e.akamai.net/assets.github.com%2Fimages%2Fgravatars%2Fgravatar-140.png","login":"unera"},"body":"```\r\n$ cat test.json.t\r\n```\r\n\r\n```perl\r\n#!/usr/bin/perl\r\n\r\nuse warnings;\r\nuse strict;\r\nuse utf8;\r\n\r\nuse Test::More tests    => 2;\r\nuse Encode qw(decode encode);\r\n\r\nBEGIN {\r\n    my $builder = Test::More->builder;\r\n    binmode $builder->output,         \":utf8\";\r\n    binmode $builder->failure_output, \":utf8\";\r\n    binmode $builder->todo_output,    \":utf8\";\r\n\r\n    use_ok 'Mojo::JSON';\r\n\r\n}\r\n\r\nmy $json = '{\"abc\": \"Привет медвед\"}';\r\n\r\nmy $parsed = Mojo::JSON->new->decode($json);\r\ndiag explain $parsed unless ok $parsed, 'Parsed';\r\n```\r\n\r\n<pre>\r\n$ perl test.json.t\r\n\r\n1..2\r\nok 1 - use Mojo::JSON;\r\nnot ok 2 - Parsed\r\n#   Failed test 'Parsed'\r\n#   at test.mojo.t line 26.\r\n# undef\r\n# Looks like you failed 1 test of 2.\r\n</pre>\r\n\r\nIf I replace russian character from input JSON it will work fine. ","assignee":null,"id":2523216,"pull_request":{"patch_url":null,"html_url":null,"diff_url":null},"labels":[],"number":241,"title":"'Mojo::JSON' does it work properly? ","html_url":"https://github.com/kraih/mojo/issues/241","closed_at":"2011-12-12T15:57:45Z","url":"https://api.github.com/repos/kraih/mojo/issues/241","milestone":null},"action":"closed"}