Re: Re: space saving wanted!

How could i do this if i wanted to test each $count for being over 0 ?? e.g.



if ($calc < 0 )  {

      print "$some_variable\n";

 }
[download]

Comment on Re: Re: space saving wanted! Download Code

Replies are listed 'Best First'.
Re: Re: Re: space saving wanted! by vek (Prior) on Apr 23, 2003 at 15:44 UTC
Well demerphq already gave you 99.9% of the code, just test to see if each variable is greater than zero: `my ($calc1, $calc2, $calc3, $calc4); foreach my $calc ( $calc1, $calc2, $calc3, $calc4 ) { print "$calc\n" if ($calc > 0); }` [download] -- vek --	[reply] [d/l]
Re: Re: Re: Re: space saving wanted! by demerphq (Chancellor) on Apr 23, 2003 at 19:44 UTC
It seems to me that annonymok should review perlsyn. What do you think? --- demerphq _{<Elian> And I do take a kind of perverse pleasure in having an OO assembly language...}	[reply] [d/l]
Re: Re: Re: Re: Re: space saving wanted! by vek (Prior) on Apr 23, 2003 at 22:19 UTC
Absolutely, by the looks of things it certainly wouldn't hurt would it :-) demerphq++ -- vek --	[reply]


No such thing as a small change
	PerlMonks