पर्ल में, एक json जाँच डीकोड बूलियन मान

Question

डीकोड JSON बूलियन्स वस्तुओं रहे हैं:

#!/usr/bin/env perl 

use strict; 
use warnings; 

use Data::Dumper; 
use JSON; 

my $json_string = '{"boolean_field":true}'; 
my $decoded_json = from_json $json_string; 

print Dumper $decoded_json; 

आउटपुट:

$VAR1 = { 
      'boolean_field' => bless(do{\(my $o = 1)}, 'JSON::XS::Boolean') 
     }; 

JSON.pm documentation से मैं निम्नलिखित तीन तरीकों के बारे में जानते हैं:

• JSON :: is_bool
• JSON :: true
• JSON :: झूठी

हालांकि, कुछ मूर्खतापूर्ण कारण के लिए मैं निर्धारित करने के लिए कैसे यदि $decoded_json में 'boolean_field' का मान सही या गलत है पता नहीं है।

(बहुत बुनियादी सवाल के लिए खेद है, यह मुझे बैटी ड्राइविंग गया है!)

Answer 1

यह पर्ल में एक truthy मूल्य होगा। बस इसे सामान्य के रूप में एक्सेस करें।

print 'true' if $decoded_json->{'boolean_field'};