Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw

Re: simple condition

by TheoPetersen (Priest)
on Sep 25, 2001 at 01:11 UTC ( #114429=note: print w/ replies, xml ) Need Help??

in reply to simple condition

I don't understand the two conditions, so I'll try one each way. Suppose we have a foreach loop that loads @flds based on some other array of values, @vals. If all five fields are available then run the sub:

OUTER_LOOP: foreach my $val (@vals) { @flds = something to do with $val; foreach my $check (@flds[9..13]) { next OUTER_LOOP unless $check; } &add_sub (): print "</tr>\n"; }
If any one is available then run the sub:
foreach my $val (@vals) { @flds = something to do with $val; my $go_ahead; foreach my $check (@flds[9..13]) { if ($check) { $go_ahead = 1; last; } } if ($go_ahead) { &add_sub (); print "</tr>\n"; } }
Something like that?

Comment on Re: simple condition
Select or Download Code

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://114429]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others browsing the Monastery: (11)
As of 2015-11-25 21:35 GMT
Find Nodes?
    Voting Booth?

    What would be the most significant thing to happen if a rope (or wire) tied the Earth and the Moon together?

    Results (691 votes), past polls