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