c:\@Work\Perl\monks>perl -wMstrict -MData::Dump -le
"my $added = [
   { link => '/var/www/docs',  name => 'mydocs', },
   { link => '/var/www/read',  name => 'letters', }
   ];
 ;;
 my @keys = qw(link name);
 ;;
 my $hashref = {
   map { my $k = $_;  map { $k => $_->{$k} } @$added } @keys,
   };
 ;;
 dd $hashref;
"
{ "link" => "/var/www/read", name => "letters" }