Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses
 
PerlMonks  

Re^3: C-Style Struct?

by Mr. Newb (Acolyte)
on Aug 08, 2012 at 14:06 UTC ( #986287=note: print w/replies, xml ) Need Help??


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 (Pope) 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

    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?