NAME Judy::HS - Library for creating and accessing a dynamic array, using an array-of-bytes of Length as an Index and a word as a Value. SYNOPSIS Shows an ultra-cheap hash for removing duplicates. my $judy = 0; while (<>) { JHSI( my( $value ), $judy, $_, length ); print if ! $value; } DESCRIPTION Judy::HS is an interface to the JudyHS macros in the Judy array library. A JudyHS array is the equivalent of an array of word-sized value/pointers. An Index is a pointer to an array-of-bytes of specified length: Length. Rather than using a null terminated string, this difference from JudySL(3X) allows strings to contain all bits (specifically the null character). This new addition (May 2004) to Judy arrays is a hybird using the best capabilities of hashing and Judy methods. JudyHS does not have a poor performance case where knowledge of the hash algorithm can be used to degrade the performance. Since JudyHS is based on a hash method, Indexes are not stored in any particular order. Therefore the JudyHSFirst(), JudyHSNext(), JudyHSPrev() and JudyHSLast() neighbor search functions are not practical. The Length of each array-of-bytes can be from 0 to the limits of malloc() (about 2GB). The hallmark of JudyHS is speed with scalability, but memory efficiency is excellent. The speed is very competitive with the best hashing methods. The memory efficiency is similar to a linked list of the same Indexes and Values. JudyHS is designed to scale from 0 to billions of Indexes. A JudyHS array is allocated with an undefined or 0 value. my $PJHSArray = 0; EXPORT All functions are exportable by Sub::Exporter. RAW FUNCTIONS The following functions follow the C macro API as closely as possible. I don't yet know how to meaningfully have modifiable $PValue pointers. The values below are hopefully mapped to useful Perl analogues. The sole exception is $PValue which is just exposed as a numified pointer. This will hopefully change to be more useful. Word_t * PValue; // JudyHS array element int Rc_int; // return flag Word_t Rc_word; // full word return value Pvoid_t PJHSArray = (Pvoid_t) NULL; // initialize JudyHS array uint8_t * Index; // array-of-bytes pointer Word_t Length; // number of bytes in Index JHSI( $Value, $PJHSArray, $Index, $Length ) // JudyHSIns() Given a pointer to a JudyHS array ($PJHSArray), insert an $Index string of length: $Length and a $Value into the JudyHS array: $PJHSArray. If the $Index is successfully inserted, the $Value is initialized to 0. If the $Index was already present, the $Value is not modified. TODO: document and figure out how to do something meaningful from Perl. This part is just the C documentation and not meaningful for use in Perl. Return PValue pointing to Value. Your program should use this pointer to read or modify the Value, for example: Value = *PValue; *PValue = 1234; Note: JHSI() and JHSD can reorganize the JudyHS array. Therefore, pointers returned from previous JudyHS calls become invalid and must be re-acquired (using JHSG()). JHSD($Rc_int, $PJHSArray, $Index, $Length) // JudyHSDel() Given a pointer to a JudyHS array ($PJHSArray), delete the specified $Index along with the $Value from the JudyHS array. Return $Rc_int set to 1 if successfully removed from the array. Return $Rc_int set to 0 if $Index was not present. JHSG($PValue, $PJHSArray, $Index, $Length) // JudyHSGet() Given a pointer to a JudyHS array ($PJHSArray), find $Value associated with $Index. Return $PValue pointing to $Index's Value. Return $PValue set to NULL if the $Index was not present. JHSFA($Rc_word, $PJHSArray) // JudyHSFreeArray() Given a pointer to a JudyHS array ($PJHSArray), free the entire array. Return $Rc_word set to the number of bytes freed and $PJHSArray set to NULL. AUTHOR Joshua ben Jore, "" JudyHS was invented and implemented by Doug Baskins after retiring from Hewlett-Packard. SOURCE AVAILABILITY This source is in Github: BUGS Please report any bugs or feature requests to "bug-Judy-HS at rt.cpan.org", or through the web interface at . I will be notified, and then you'll automatically be notified of progress on your bug as I make changes. SUPPORT You can find documentation for this module with the perldoc command. perldoc Judy::HS You can also look for information at: * RT: CPAN's request tracker * AnnoCPAN: Annotated CPAN documentation * CPAN Ratings * Search CPAN ACKNOWLEDGEMENTS Doug Baskins, totally. COPYRIGHT & LICENSE Copyright 2008 Joshua ben Jore, all rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.