Closed benkasminbullock closed 5 years ago
use JSON::Create; use boolean; my $thing = {'Yes' => true, 'No' => false}; my $jc = JSON::Create->new (); print $jc->run ($thing), "\n"; $jc->bool ('boolean'); print $jc->run ($thing), "\n"; outputs
These quoted values are the old ones:
{"No":"0","Yes":"1"} {"No":false,"Yes":true}
use JSON::Create; use boolean; my $thing = {'Yes' => true, 'No' => false}; my $jc = JSON::Create->new (); print $jc->run ($thing), "\n"; $jc->bool ('boolean'); print $jc->run ($thing), "\n"; outputs
These quoted values are the old ones:
{"No":"0","Yes":"1"} {"No":false,"Yes":true}