Select Code to Download

typedef struct {
    U64 addr;
...
    U32    used;
    double factor;
} BIMAP;

C:\test>1112165-hash
Start: mem: 7,920 K
...
Fetch by Name took 7.539046 seconds
Fetch by Addr took 8.349479 seconds
Hash queried: check mem: 4,382,852 K

C:\test>BiMap -S=5 -F=0.71 -I=12000000 -D=0
bless(do{\(my $o = 52848976)}, "BiMap")

Fetch by Addr & Fetch by Name took 22.257803 seconds for 11881376 item
+s in a 16777216 sized BiMap
Mem: 580,552 K

C:\test>BiMap -S=5 -F=0.70 -I=20000000 -D=0
bless(do{\(my $o = 52848976)}, "BiMap")

Fetch by Addr & Fetch by Name took 19.896479 seconds for 11881376 item
+s in a 33554432 sized BiMap
Mem: 777,532 K

#! perl -slw
package BiMap; use strict; #use Config;
...
    print sum( values %counts );
    print $total / $bm->used;
}