[Perl 6] Using array as parameters

Perl 6 |

0 B

None

0 👍

0 👎

Raw Download Clone Embed Print View

sub add(@arr) {
    my $sum = 0;
    
    for @arr -> $e {
        $sum += $e;
    }
    
    $sum;
}
 
my @arr = (1, 2, 3, 4, 5);
my $sum = add(@arr);
$sum == 15 or die "Wrong value";

Comments

01/01/70 12:00:00 AM UTC
Plain Text |
0 B
|
👍
/
👎
01/01/70 12:00:00 AM UTC
Plain Text |
0 B
|
👍
/
👎

Pasted

[Perl 6] Using array as parameters

Comments