Select Code to Download

for my $entry ($searchresult->entries) {
   my $uid = $entry->get('uid');
...
         $uids{$uid}{$_} = ${$uid}[0];
   }
}