{
    local @_;
    alias $_[0] = $x;
    alias $_[1] = $y+1;
    alias $_[2] = $z;
    &foo;
}