if ( $count ne 0 ) {
	for $k (1 .. $count) {
		my $export = 1;
    	my $contact = $folder->{Items}->Item($k);
    
	    for my $field ( @FIELDS ) {
	    	my $string = $contact->{ $field->[0] };
			if ( $string ) {	    	
	        	$string =~ s/ä/ae/g;
				$string =~ s/ö/oe/g;
				$string =~ s/ü/ue/g;
				$string =~ s/Ä/Ae/g;
				$string =~ s/Ö/Oe/g;
				$string =~ s/Ü/Ue/g;
				$string =~ s/ß/ss/g;
				$string =~ s/é/e/g;
				$string =~ s/[&\/\\]//g;
			}
			my $property = $field->[0]