Your skill will accomplish what the force of many cannot |
|
PerlMonks |
Re: Looping through an arrayby choroba (Cardinal) |
on Sep 27, 2021 at 20:21 UTC ( [id://11137068]=note: print w/replies, xml ) | Need Help?? |
The contents of $DATA in not Perl, it looks like a JSON. There are modules to turn JSON into a Perl structure (e.g. Cpanel::JSON::XS). Your code doesn't compile under strict. That's because $doc_data is declared only in the for loop, but you use it outside of it in the else part. Without strict, it runs, but doesn't output anything. Please, try to post the actual code. Help us to help you.
map{substr$_->[0],$_->[1]||0,1}[\*||{},3],[[]],[ref qr-1,-,-1],[{}],[sub{}^*ARGV,3]
In Section
Seekers of Perl Wisdom
|
|