Question

I am trying to iterate over this data structure:

$deconstructed->{data}->{workspaces}[0]->{workspace}->{facts}[0]->{code}

where fact[0] is increasing. It’s several files I am processing so the number of {facts}[x] varies.

I thought this might work but it doesn’t seem to be stepping up the $iter var:

foreach $iter(@{$deconstructed->{data}->{workspaces}[0]->{workspace}->{facts}}){
  print $deconstructed->{data}->{workspaces}[0]->{workspace}->{facts}[$iter]->{code}."\n";
}

I’m totally digging data structures but this one is stumping me. Any advice what might be wrong here?

Answer 1

$iter is being set to the content of each item in the array not the index. e.g.

my $a = [ 'a', 'b', 'c' ];
for my $i (@$a) {
    print "$i\n";
}

…prints:

a
b
c

Try:

foreach $iter (@{$deconstructed->{data}->{workspaces}[0]->{workspace}->{facts}}){
    print $iter->{code}."\n";
}