Select Code to Download

$uid = ${$entry->get('uid')}[0] if defined $entry->get('uid');
# and
...

for my $entry ( $searchresult->entries ) {
    my $aref = $entry->get( 'uid' );
...
        print Dumper( \$entry );
    }
}