http://www.perlmonks.org?node_id=986287


in reply to Re^2: C-Style Struct?
in thread C-Style Struct?

My self has few answers, that's why I come here. How would I iterate through the array $thing{list}? ie, what would I write for a foreach loop?

Replies are listed 'Best First'.
Re^4: C-Style Struct?
by BrowserUk (Patriarch) on Aug 08, 2012 at 14:17 UTC
    How would I iterate through the array $thing{list}? ie, what would I write for a foreach loop?

    my %thing = ( name => 'fred', count => 100, list => [ 1..10 ] );

print $thing{ list }[ 3 ];
4

for my $item ( @{ $thing{ list } } ) {
    print $item;
}
1
2
3
4
5
6
7
8
9
10

for( my $index=0; $index < @{ $thing{ list } }; ++$index ) {
    print "$index : $thing{ list }[ $index ]";
}
0 : 1
1 : 2
2 : 3
3 : 4
4 : 5
5 : 6
6 : 7
7 : 8
8 : 9
9 : 10

print for @{ $thing{ list } };
1
2
3
4
5
6
7
8
9
10

    [download]
    With the rise and rise of 'Social' network sites: 'Computers are making people easier to use everyday'
    Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
    "Science is about questioning the status quo. Questioning authority".
    In the absence of evidence, opinion is indistinguishable from prejudice.

    The start of some sanity?
[reply]
[d/l]

In Section Seekers of Perl Wisdom