sub sum {
    my $aref = shift;
    my $total = 0;
    $total += $aref->[ $_ ] for 0 .. $#{ $aref };
    return $total;
}

my @data = getNums();

my $sum = sum( \@data );