neversaint has asked for the wisdom of the Perl Monks concerning the following question:
that yields:my @output = myfunc("data_value1"); print Dumper \@output;
My question is how can iterate/print such data structure so that I can get the output like this:$VAR1 = [ bless( { 'ID' => 'WBGene00000099', 'DBConnection' => bless( { 'database' => 'treefam_6', 'database_handle' => bless( {}, 'DBI::db' ) }, 'Treefam::DBConnection' ), 'species' => 'Caenorhabditis elegans', 'bootstrap' => '19', 'species_name_type' => 'LATIN' }, 'Treefam::Gene' ), bless( { 'ID' => 'WBGene00000098', 'DBConnection' => $VAR1->[0]{'DBConnection'}, 'species' => 'Caenorhabditis elegans', 'bootstrap' => '1', 'species_name_type' => 'LATIN' }, 'Treefam::Gene' ), bless( { 'ID' => 'YPL209C', 'DBConnection' => $VAR1->[0]{'DBConnection'}, 'species' => 'Saccharomyces cerevisiae', 'bootstrap' => '47', 'species_name_type' => 'LATIN' }, 'Treefam::Gene' ) ];
namely from "ID" and "species" keys.WBGene00000099 - Caenorhabditis elegans WBGene00000098 - Caenorhabditis elegans YPL209C - Saccharomyces cerevisiae
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: Iterating Blessed Array of Array
by moritz (Cardinal) on Dec 06, 2008 at 15:37 UTC | |
by oeuftete (Monk) on Dec 06, 2008 at 16:33 UTC |