Help for this page

Select Code to Download


  1. or download this
    my $LDIF;
unless (open ($LDIF, "<", $ldifFile)) {
...

  close ($LDIF);
} # else
  2. or download this
    perl -e "$/ = qq~\n\n~" -pe "s/\n /g" infile > outfile
  3. or download this
    perl -e '$/ = "\n\n"' -pe 's/\n /g' infile > outfile