Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl

...
print "Bad filter:\n";
my $f2 = Net::LDAP::Filter->new($badFilter);
$f2->print;
  2. or download this
    ./filtertest.pl 
Good filter:
(objectGUID= ^\b7\c0\af\96\e2\bdN\b5\c3=V\0a\0b1X)
Bad filter:
Can't call method "print" on an undefined value at ./filtertest.pl lin
+e 17.