Re: Rook question

[NetWallah]

in reply to Rook question

Try this:

sub total{
        my $sum = shift(@_);
        foreach (@_){
                $sum += $_;
                }
  return $sum;
}

• add $_, not @_
• return $sum
• Add trailing } to match braces

[squimby]

Awesome! Fixed the problem--thanks much! I didn't know if Perl associated the default $_ while moving through the indices of @_.

[davido]

The mechanism of action is the foreach loop. It's just as happy aliasing $_ to elements of @this, @that, and @the_other as well. In this regard, @_ isn't special; foreach is.

perlsyn

[Anonymous Monk]

perlintro#foreach