Select Code to Download

my %lookup; 
while (<$LDIF>) {
...
   $lookup{$dn} = $samACCOUNTNAME
    if defined $dn and defined $samACCOUNTNAME; # only if both are fou
+nd
}

if($lookup{$current_dn}) { ... }

    push @{$lookup{$dn}}, $samACCOUNTNAME;

$lookup{$current_dn}[0]