Another idea, especially if the arrays are large and you need to do many operations on them, is the module PDL.

use strict;
use PDL;

my $numbers = pdl (2,3,4,5);
my $total = prod($numbers);
print $total,"\n";
[download]