Help for this page

Select Code to Download


  1. or download this
    my $filename = "anything.ldif";

...
  close (LDIF);
} # else
  2. or download this
    use Digest::MD5 (); # no namespace pollution
...
if ($seenObjects{ &Digest::MD5::md5_hex($_) }++) {
...