Help for this page

Select Code to Download


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

...
print STDOUT ($filter->check("Bim") ? "Found" : "Not Found"), "\n";

exit;
  2. or download this
    jreades@sort:~>> ./test.pl
Use of uninitialized value in numeric gt (>) at Bloom/Filter.pm line 1
+26.
...
Argument "" isn't numeric in numeric eq (==) at Bloom/Filter.pm line 8
+6.
Argument "" isn't numeric in numeric eq (==) at Bloom/Filter.pm line 8
+6.
Found