Aside from suggesting Text::CSV, consider the very-useful join() function, which can do simple things like join("," 1, 2, 3); with ease.