my @array = ( some values );

While ( my_condition ) {
$buffer = $array[0];
$array[0] = new_value;

mytestfunc(\@array);

$array[0] = $buffer;
}