Select Code to Download

            print Dumper $json_decoded;
            for my $key1 (keys $json_decoded)
...
                    }
                }
            }

$VAR1 = {
          'data' => [
...
key 3:  model + xyz
key 3:  storageDeviceId + 800000058068
key 3:  serialNumber + 58068