/[Search-TokyoDystopia]/lib/Search/TokyoDystopia.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /lib/Search/TokyoDystopia.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 16 by dpavlin, Mon Aug 18 17:27:11 2008 UTC revision 23 by dpavlin, Mon Aug 18 18:55:38 2008 UTC
# Line 32  IDBOLCKNB Line 32  IDBOLCKNB
32  tcidbclose  tcidbclose
33  tcidbput  tcidbput
34  tcidbout  tcidbout
35    tcidbget
36    tcidbsearch
37    tcidbsearch2
38    IDBSSUBSTR
39    IDBSPREFIX
40    IDBSSUFFIX
41    IDBSFULL
42    IDBSTOKEN
43    IDBSTOKPRE
44    IDBSTOKSUF
45    tcidbiterinit
46    tcidbiternext
47    tcidbsync
48    tcidboptimize
49  );  );
50    
51  =head1 NAME  =head1 NAME
# Line 99  use constant { Line 113  use constant {
113    
114  =head2 tcidbput  =head2 tcidbput
115    
116    my $success = tcidbput( $idb, $id, $utf8_text );    my $success = tcidbput( $idb, $id, $text );
117    
118  =head2 tcidbout  =head2 tcidbout
119        
120    my $success = tcidbout( $idb, $id );    my $success = tcidbout( $idb, $id );
121    
122    =head2 tcidbget
123      
124      my $text = tcidbget( $idb, $id );
125    
126    =head2 tcidbsearch
127    
128      my $ids = tcidbsearch( $idb, $word, IDBSSUBSTR );
129    
130    =cut
131    
132    use constant {
133            IDBSSUBSTR => 0,                # substring matching
134            IDBSPREFIX => 1,                # prefix matching
135            IDBSSUFFIX => 2,                # suffix matching
136            IDBSFULL => 3,          # full matching
137            IDBSTOKEN => 4,         # token matching
138            IDBSTOKPRE => 5,                # token prefix matching
139            IDBSTOKSUF => 6,                # token suffix matching
140    };
141    
142    =head2 tcidbsearch2
143    
144      my $ids = tcidbsearch2( $idb, $expr );
145    
146    =head2 tcidbiterinit
147    
148      my $success = tcidbiterinit( $idb );
149    
150    =head2 tcidbiternext
151    
152      my $id = tcidbiternext( $idb );
153    
154    =head2 tcidbsync
155    
156      my $success = tcidbsync( $idb );
157    
158    =head2 tcidboptimize
159    
160      my $success = tcidboptimize( $idb );
161    
162    =cut
163    
164  =head1 KNOWN BUGS  =head1 KNOWN BUGS
165    
166  Low-level functions often just die when called on invalid (or deleted) database  Low-level functions often just die when called on invalid (or deleted) database
Legend:
Removed from v.16  
changed lines
  Added in v.23
  ViewVC Help
Powered by ViewVC 1.1.26