sub add ($$) {$_[0] + $_[1]} my @arr = (3, 4); print add(@arry);