sub x {

  ($new_val, $new_val2, $old_value_returned_when_called_in_scalar_context);