my $prog = new IO::File "| $ldapadd -x 2>&1" or die "Unable to open $ldapadd: $!";