Select Code to Download

      if ($val != "0")

            @values=(@values,$val);

            push @values, $val;

&maximum(@values,$arraysize);

...
      my $average = $sum / $arraysize;
      return $average;
      }