my ($fads, $fadam, $fout) = @ARGV;
my $Ads = read2hash($fads, 'sAMAccountName');    # strukturiert einlesen, siehe unten
my $Adam = read2hash($fadam, 'cn');    # Da dn kein Attribute ist -> cn