मैं पर्ल में JSON कैसे पार्स कर सकता हूं?

Question

मैं पर्ल स्क्रिप्ट का उपयोग करना चाहता हूं जो JSON डेटा प्राप्त करता है और इसे XML फ़ाइल में परिवर्तित करता है। मैं पर्ल में ऐसा कैसे कर सकता हूं?

Answer 1

स्थापित करें: XML::XML2JSON

साथ

sudo cpan एक्सएमएल :: XML2JSON

और फिर प्रयास करें:

use XML::XML2JSON; 
my $JSON = '{"entry":{"name":"Douglas Crockford","phone":"555 123 456"}}'; 
my $XML2JSON = XML::XML2JSON->new(); 
my $Obj = $XML2JSON->json2obj($JSON); 
my $XML = $XML2JSON->obj2xml($Obj); 
print $XML; 

Answer 2

use JSON; 

my $json_string = '................'; 

my $deserialized = from_json($json_string); 

बस इतना ही - अपने JSON डेटा पार्स और संग्रहीत किया जाता है $ deserialized में।