The above code prints only one pair of values.

for my $data_pair (@data_list) {

print "$data_pair->{'key'},$data_pair->{'value'}\n";

}
correct,AAA
correction,BBB
date,20090303
date,20090308
[download]

These values and keys should be converted to hash map