Your output looks like a hash or list was pushed on the array instead of a hash reference. Sure enough, the first if has:

         push @{$records}, %record;
[download]

instead of

         push @{$records}, \%record;
[download]

Note the missing backslash.