Beefy Boxes and Bandwidth Generously Provided by pair Networks
The stupid question is the question not asked
 
PerlMonks  

Re: Clean way of adding values to complex data structure

by blokhead (Monsignor)
on Jul 22, 2009 at 21:00 UTC ( #782441=note: print w/replies, xml ) Need Help??


in reply to Clean way of adding values to complex data structure

No need to nest loops. The condition you mentioned can be checked without iterating through each entire hash. You still have to iterate through the array, though.
for (@$pages) { $_->{flag} = 1 if $_->{url} eq "/html/about.html"; }
If you want to get really fancy, it can be a one liner, but I think that using logical connectives (and/or) for flow control hurts readability, especially in a complex statement with modifiers.
$_->{url} eq "/html/about.html" and $_->{flag} = 1 for @$pages;

blokhead

Replies are listed 'Best First'.
Re^2: Clean way of adding values to complex data structure
by Rodster001 (Pilgrim) on Jul 22, 2009 at 21:13 UTC
    Just what I was looking for... thanks!

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://782441]
help
Chatterbox?
[1nickt]: hippo lately I can tell just by the fact that Anonymous posts a reply after some hours that it is more than likely That Monk.
[virtualsue]: weird. my p6 simple web spider fails to extract anchor tags from perlmonks.org
[holli]: Nice. Turns out I don't have to remove Sweet home Alabama from my playlist ;)
[Corion]: virtualsue: We have some links with a newline between <a and the attributes, maybe your extractor fails to handle that?

How do I use this? | Other CB clients
Other Users?
Others musing on the Monastery: (6)
As of 2017-12-13 11:52 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    What programming language do you hate the most?




















    Results (360 votes). Check out past polls.

    Notices?