Perl Json Array

Question

I have an array of json objects in json format and in a file. I'm trying to load the file into perl, cycle through each item of the array (each json object) ...

I've used the code bellow, but it seams that no matter what I do, perl is treating it not as an array of objects, rather as a big object. Any help would be greatly appreciated.

my $json_text = do {
   open(my $json_fh, "<:encoding(UTF-8)", $filename)
      or die("Can't open \$filename\": $!\n");
   local $/;
   <$json_fh>
};

@objects = JSON->new->utf8->decode($json_text);
print  Dumper(@objects);

can you post the dumper output, maybe we find a workaround.

Flo Win
– Flo Win

2015-03-25 07:35:46 +00:00
Commented Mar 25, 2015 at 7:35 — Flo Win
– Flo Win, Commented Mar 25, 2015 at 7:35

Borodin · Accepted Answer · 2015-03-25 07:43:17Z

3

It sounds like your file contains a single JSON array. In that case your call to decode will return a reference to a Perl array, so if you write

my $objects = JSON->new->utf8->decode($json_text)

you can access each object as $objects->[0], $objects->[1] etc. Or you can iterate over them with

for my $object ( @$objects ) {

    # Do stuff with $object
}

answered Mar 25, 2015 at 7:43

Borodin

127k9 gold badges72 silver badges146 bronze badges

Sign up to request clarification or add additional context in comments.

2 Comments

Mehdi Over a year ago

thanks it works, I've never used perl and trying to take over some code that was written by another developer. All the @$% signs in perl are new to me. I'm guessing @$ dereferences a pointer to an array?

Borodin Over a year ago

@MehdiAbderezai: Perl was designed by a linguist so each identifier has a singular form $scalar (read this scalar), an unrelated plural form @array (read these array items) and a dictionary form %hash. It's built-in Hungarian notation. So to acccess one element (singular) of an array (plural) you write $array[0] etc. And yes, @$ dereferences an array reference, but it's best to read @$objects as the items in $object, just as @array is the items in array

Collectives™ on Stack Overflow

Perl Json Array

1 Answer 1

2 Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

2 Comments

Your Answer

Sign up or log in

Post as a guest

Related