Select Code to Download

use Data::Dump;
use JSON::PP;
...
  foo => bless(do{\(my $o = 1)}, "JSON::PP::Boolean"),
}
foo=1, bar=0