@records = split /(^ {3}\w.*\n)/m, $input;
[download]

should give you:

"",
"   record1blah\n", "     dataforrecord1\n    moredataforrecord1\n",
"   record2blah\n", "     dataforrecord2\n    moredataforrecord2\n",
...
[download]

You'll need to toss that first empty element... it's the part of the string leading up to your first record.

-- Randal L. Schwartz, Perl hacker