my (*arr)= ret_arr_ref(); 
print @arr