This produces:

Reference found where even-sized list expected at ./875882.pl line 7.
$VAR1 = {
          'record' => {
                        'a' => 11,
                        'b' => 22
                      },
          'HASH(0x604290)' => undef
        };
[download]

If you had read the warning, you'd have realized that there's something wrong with the line

my %test = { record => ' ' };
[download]