$, = ','; print @array;