Help for this page

Select Code to Download


  1. or download this
    my @nums = (5, 10, 15, 20, 25);
    
  2. or download this
    my $totalSum = 0;
    $totalSum += $_ for @nums;
    
  3. or download this
    use List::Util 'sum';
    my $totalSum = sum @nums;
    
  4. or download this
    my @array = map { $_ / $totalSum } @nums;