Select Code to Download

use JSON;
use Data::Dumper;
$Data::Dumper::Useqq = 1;
my $data = decode_json( $file_content );
warn Dumper $data;