So I am needing to parse JSON data. Whenever I have JSON data like this:

{
    "items" : [
        {   "name" : "Theodor Nelson",
            "id": "_333301"
        },
        {   "name": "Morton Heilig",
            "id": "_13204"
         }
        ]
}
[download]

I can loop through it fine with this code:

 

 use JSON -support_by_pp;
 my $json = JSON->new->pretty;
 my $json_object = $json->decode($json_text);
 
for my $item( @{$json_object->{items}} ){
    print $item->{name} . "\n";
}
[download]

However, whenever my data is like this:

[
  {
    name: "a",
    value: "1"
  },
  {
    name: "b",
    value: "2"
  },
  {
    name: "c",
    value: "3"
  },
  {
    name: "d",
    value: "4"
  },
  {
    name: "e",
    value: "5"
  }
]
[download]

I do not know how to access it because there is no "header" like "items" there was to identify the first set of data by with:  $json_object->{items} and when I just do $json_object, it does not work. Can anyone help?