sub foo { alias $_[0] => my $byRef; ... $byRef += $result; }