dimar has asked for the wisdom of the Perl Monks concerning the following question:
Given a data structure like this ...
$oWkBook = { students =>[ {fname=>'joe',lname=>'bloe',age=>'18'}, {fname=>'jill',lname=>'bill',age=>'16'}, ], teachers => [ {fname=>'joe',lname=>'sloe',age=>'38'}, {fname=>'jill',lname=>'sill',age=>'36'}, ], admins =>[ {fname=>'koe',lname=>'moe',age=>'58'}, {fname=>'dill',lname=>'mill',age=>'56'}, ], };
How can I change this ...
### iterate (current) for my $oWkSheet (keys %{$oWkBook}){ for my $oRec (@{$oWkBook->{$oWkSheet}}){ for my $oFld (keys %{$oRec}){ $oRec->{$oFld} =~ s/^\s+\n$//; }; }; };
into this ...
### iterate (wanted) for my $item ($oWkBook->iterate_fields()){ $item =~ s/^\s+\n$//; };
I've given SuperSearch a say, but it seems the examples assume a simple sequence of items (e.g. array), when what I want to do is iterate over an arbitrarily-nested data structure. (e.g. HoAoH)
My long term goal is to be able to reproduce this pattern regardless of the structure of the data variable. The request here is for a link or an example of handling HoAoH with iterators that I can use as a starting point for understanding this design pattern a little better.
=oQDlNWYsBHI5JXZ2VGIulGIlJXYgQkUPxEIlhGdgY2bgMXZ5VGIlhGV
|
---|
Replies are listed 'Best First'. | |
---|---|
Re: iterators: traversing arbitrary data structure
by BrowserUk (Patriarch) on Jan 11, 2006 at 22:17 UTC | |
Re: iterators: traversing arbitrary data structure
by dragonchild (Archbishop) on Jan 11, 2006 at 20:45 UTC | |
Re: iterators: traversing arbitrary data structure
by eric256 (Parson) on Jan 11, 2006 at 21:21 UTC | |
Re: iterators: traversing arbitrary data structure
by CaMelRyder (Pilgrim) on Jan 12, 2006 at 04:55 UTC | |
Re: iterators: traversing arbitrary data structure
by ikegami (Patriarch) on Jan 11, 2006 at 21:01 UTC | |
by ikegami (Patriarch) on Jan 11, 2006 at 21:48 UTC |
Back to
Seekers of Perl Wisdom