Select Code to Download

$ perl -MData::Dumper -MJSON -wE 'print Dumper decode_json("[true]")'
$VAR1 = [
          bless( do{\(my $o = 1)}, 'JSON::PP::Boolean' )
        ];