If I understand your question right, you don't want the \n chopped off the end of each line. The answer is: use positive look-behind assertions (see perlre). These have zero width, therefore what they match is not lost in the split:

@data = split /(?<=\n)/, $data;
[download]

HTH,

pike