my %final_hash;
foreach my $data_pair ( @data_list)
{
  $key   = $data_pair->{ key };
  $value = $data_pair->{value};
  $final_hash{ $key } = $value;
}

use Data::Dumper;
print Dumper \%final_hash;