Help for this page
my @sign=( .... ); # Some combination of -1, 0 1 my @sum= map { $sign[$i] * $VAR1[$i] } (0..$#VAR1); print eval join ' + ', @sum;
www.com | www.net | www.org
No recent polls found
