Select Code to Download

use JSON;

...
my $hashref = decode_json $json;
my @array = %$hashref;
print join ', ', @array;

my @array = %$params;