Select Code to Download

malformed JSON string, neither tag, array, object, number, string or a
+tom, at character offset 0 (before "\x{feff}[{"registered...")

use strict;
use warnings;
...
Using this JSON file as a test...
<code>
[{"registered":true,"insolvent":false,"administration":true,"test":fal
+se}]

$VAR1 = [
          {
...
            'insolvent' => $VAR1->[0]{'test'}
          }
        ];

foreach my $key(keys %{@{$json}[0]}) {
    print "$key - ";
    print ${@{$json}[0]}{$key};
    print "\n";
}