sub copy { my @t = @_ }; my $rv = func( copy($i), copy(++i), copy($i+2) );