Help for this page

Select Code to Download

Select or download this

c:\@Work\Perl\monks>perl -wMstrict -le
"use List::Util qw(sum);
...
 print $x;
"
4