Anonymous Monk has asked for the wisdom of the Perl Monks concerning the following question:
Hi Monks!
I get this data where I need to get the values, when I loop through it, the values are coming duplicated, cant see where the issue is anymore:
My test data:
I am trying to get this:
Im getting data, but its duplicating:
Thanks for looking!
I get this data where I need to get the values, when I loop through it, the values are coming duplicated, cant see where the issue is anymore:
My test data:
my $DATA = { "required": [ { "docs": [ { "sec": "123A", "number": "1" } ], "name": "Mary Lou" }, { "docs": [ { "sec": "4567", "number": "1" } ], "name": "John De" }, { "docs": [ { "sec": "8763", "number": "1" } ], "name": "Smith Doe" }, { "docs": [ { "sec": "123B", "number": "1" } ], "name": "Joe De" } ], }; ... for my $dta ( @{ $DATA->{ required } || [] } ){ # if the docs is true if( scalar @{ $dta->{ docs } } ){ for my $doc_data ( @{ $dta->{ docs } || [] } ){ if( $doc_data->{'sec'} ) { # Get sec - number and name } } }else { warn "NO: $doc_data->{'sec'} | $doc_data->{'number'} \n"; # Get sec - numnber and name } } ...
I am trying to get this:
"sec": "123A", "number": "1" "name": "Mary Lou" "sec": "4567", "number": "1" "name": "John De" "sec": "8763", "number": "1" "name": "Smith Doe" "sec": "123B", "number": "1" "name": "Joe De"
Im getting data, but its duplicating:
"sec": "123A", "number": "1" "name": "Mary Lou" "sec": "4567", "number": "1" "name": "John De" "sec": "8763", "number": "1" "name": "Smith Doe" "sec": "123B", "number": "1" "name": "Joe De" "sec": "123A", "number": "1" "name": "Mary Lou" "sec": "4567", "number": "1" "name": "John De" "sec": "8763", "number": "1" "name": "Smith Doe" "sec": "123B", "number": "1" "name": "Joe De"
Thanks for looking!
Back to
Seekers of Perl Wisdom