Select Code to Download

$ perl -MJSON::Tiny -MData::Dumper -n0777E '$j=JSON::Tiny->new; $o=$j-
+>decode($_); say length $o ? Dumper($o) : $j->error;' diamondsandperl
+s.json

Malformed JSON: Expected array or object at line 0, offset 0

$ perl -MJSON -MData::Dumper -n0777E 'say Dumper( JSON->new->decode($_
+) );' diamondsandperls.json

malformed JSON string, neither array, object, number, string or atom, 
+at character offset 995 (before "],\n               "...") at -e line
+ 1, <> chunk 1.