| 1 | # lmdb lookup |
| 2 | # |
| 3 | # prep a test database to work with |
| 4 | perl -e 'chdir "DIR/aux-var"; exec "mdb_load -n DIR/aux-var/TESTNUM.mdb";' |
| 5 | VERSION=3 |
| 6 | format=print |
| 7 | type=btree |
| 8 | mapsize=10485760 |
| 9 | maxreaders=126 |
| 10 | HEADER=END |
| 11 | first |
| 12 | data for first |
| 13 | second |
| 14 | A=1 B=2 |
| 15 | third |
| 16 | A1:B2:C3 |
| 17 | DATA=END |
| 18 | **** |
| 19 | # |
| 20 | # |
| 21 | exim -be |
| 22 | ${lookup{first}lmdb{DIR/aux-var/TESTNUM.mdb}} |
| 23 | ${lookup{first}lmdb{DIR/aux-var/TESTNUM.mdb}{$value}fail} |
| 24 | ${lookup{fail}lmdb{DIR/aux-var/TESTNUM.mdb}{$value}{failure value}} |
| 25 | ${lookup{fail}lmdb{DIR/aux-var/TESTNUM.mdb}{$value}fail} |
| 26 | ${lookup{second}lmdb{DIR/aux-var/TESTNUM.mdb}{$value}fail} |
| 27 | ${extract{A}{${lookup{second}lmdb{DIR/aux-var/TESTNUM.mdb}{$value}fail}}} |
| 28 | ${extract{B}{${lookup{second}lmdb{DIR/aux-var/TESTNUM.mdb}{$value}fail}}} |
| 29 | ${extract{C}{${lookup{second}lmdb{DIR/aux-var/TESTNUM.mdb}{$value}fail}}{$value}fail} |
| 30 | **** |