Re: Re: Re: space saving wanted!

[vek]

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);
}

-- vek --

[demerphq]

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...}

[vek]

Absolutely, by the looks of things it certainly wouldn't hurt would it :-)

demerphq++

-- vek --