Without wanting to golf it, perhaps something like<br><br>my $product = 0;<br><br>for my $j (10 .. 59) {<br> $product += $split_line[$j][5];<br>}<br><br>$product = $product/50;<br><br>You could divide by 50 inside the loop, but that might introduce too many rounding errors<br>
<br><br><div class="gmail_quote">On 3 August 2010 09:04, <span dir="ltr"><pfCd?Y*_<a href="mailto:Qbdb6@perform.shyuser.com">Qbdb6@perform.shyuser.com</a>></span> wrote:<br><blockquote class="gmail_quote" style="margin: 0pt 0pt 0pt 0.8ex; border-left: 1px solid rgb(204, 204, 204); padding-left: 1ex;">
Any monger got the short version of for Perl 50 day average when written as:<br>
{<br>
$product1 =<br>
($split_line[10][5]+$split_line[11][5]+<br>
$split_line[12][5]+$split_line[13][5]+$split_line[14][5]+$split_line[15][5]+$split_line[16][5]+<br>
$split_line[17][5]+$split_line[18][5]+$split_line[19][5]+$split_line[20][5]+$split_line[21][5]+<br>
$split_line[22][5]+$split_line[23][5]+$split_line[24][5]+$split_line[25][5]+$split_line[26][5]+<br>
$split_line[27][5]+$split_line[28][5]+$split_line[29][5]+$split_line[30][5]+$split_line[31][5]+<br>
$split_line[32][5]+$split_line[33][5]+$split_line[34][5]+$split_line[35][5]+$split_line[36][5]+<br>
$split_line[37][5]+$split_line[38][5]+$split_line[39][5]+$split_line[40][5]+$split_line[41][5]+<br>
$split_line[42][5]+$split_line[43][5]+$split_line[44][5]+$split_line[45][5]+$split_line[46][5]+<br>
$split_line[47][5]+$split_line[48][5]+$split_line[49][5]+$split_line[50][5]+$split_line[51][5]+$split_line[52][5]+<br>
$split_line[53][5]+$split_line[54][5]+$split_line[55][5]+$split_line[56][5]+$split_line[57][5]+$split_line[58][5]+<br>
$split_line[59][5])/50;<br>
}<br>
<br>
<br>
<br>
<br>
<br>
<br>
_______________________________________________<br>
Wellington-pm mailing list<br>
<a href="mailto:Wellington-pm@pm.org" target="_blank">Wellington-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/wellington-pm" target="_blank">http://mail.pm.org/mailman/listinfo/wellington-pm</a><br>
</blockquote></div><br>