Sum of a series: Difference between revisions

Added Perl version.
(→‎{{header|Forth}}: added haskell)
(Added Perl version.)
Line 86:
}
}
 
=={{header|Perl}}==
<pre>my $sum = 0;
map { $sum += 1 / ( $_ * $_ ) } (1..1000);
print "$sum\n";
</pre>