Use japhy's suggestion and add a newline to your string:

@records = split /(?=\nrecord)/, ("\n" . $data);
[download]

...that way you get the necesary first newline in the regex for the first record.

Crude, but effective :)