Help for this page

Select Code to Download


  1. or download this
    # Function to add a list of numbers together
    sub sum {
    ...
        }
        return $sum;
    }
    
  2. or download this
    use List::Util 'reduce';
    sub sum {
        my @numbers = @_;
        return reduce { $a + $b } @numbers;
    }
    
  3. or download this
    sub sum {
        my $sum;
        $sum += $_ for @_;
        return $sum;
    }
    
  4. or download this
    use List::Util 'sum';