armazenar o formato Jason em Perl e recuperá -lo
#!/usr/bin/perl
use JSON;
use Data::Dumper;
$json = '{"a":1,"b":'{"f":6}',"c":3,"d":4,"e":5}';
$text = decode_json($json);
print Dumper($text);
Average Alpaca