/[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 19 by dpavlin, Mon Aug 18 18:32:55 2008 UTC revision 27 by dpavlin, Mon Aug 18 19:07:04 2008 UTC
# Line 34  tcidbput Line 34  tcidbput
34  tcidbout  tcidbout
35  tcidbget  tcidbget
36  tcidbsearch  tcidbsearch
37    tcidbsearch2
38  IDBSSUBSTR  IDBSSUBSTR
39  IDBSPREFIX  IDBSPREFIX
40  IDBSSUFFIX  IDBSSUFFIX
# Line 42  IDBSTOKEN Line 43  IDBSTOKEN
43  IDBSTOKPRE  IDBSTOKPRE
44  IDBSTOKSUF  IDBSTOKSUF
45  tcidbiterinit  tcidbiterinit
46    tcidbiternext
47    tcidbsync
48    tcidboptimize
49    tcidbvanish
50    tcidbcopy
51    tcidbpath
52    tcidbrnum
53  );  );
54    
55  =head1 NAME  =head1 NAME
# Line 121  use constant { Line 129  use constant {
129    
130  =head2 tcidbsearch  =head2 tcidbsearch
131    
132    my @ids = tcidbsearch( $idb, $word, IDBSSUBSTR )    my $ids = tcidbsearch( $idb, $word, IDBSSUBSTR );
133    
134  =cut  =cut
135    
# Line 135  use constant { Line 143  use constant {
143          IDBSTOKSUF => 6,                # token suffix matching          IDBSTOKSUF => 6,                # token suffix matching
144  };  };
145    
146    =head2 tcidbsearch2
147    
148      my $ids = tcidbsearch2( $idb, $expr );
149    
150  =head2 tcidbiterinit  =head2 tcidbiterinit
151    
152    my $success = tcidbiterinit;    my $success = tcidbiterinit( $idb );
153    
154    =head2 tcidbiternext
155    
156      my $id = tcidbiternext( $idb );
157    
158    =head2 tcidbsync
159    
160      my $success = tcidbsync( $idb );
161    
162    =head2 tcidboptimize
163    
164      my $success = tcidboptimize( $idb );
165    
166    =head2 tcidbvanish
167    
168      my $success = tcidbvanish( $idb );
169    
170    =head2 tcidbcopy
171    
172      my $success = tcidbcopy( $idb, '/path/of/copy' );
173    
174    =head2 tcidbpath
175    
176      my $path = tcidbpath( $idb );
177    
178    =head2 tcidbrnum
179    
180      my $number_of_records = tcidbrnum( $idb );
181    
182  =cut  =cut
183    
Legend:
Removed from v.19  
changed lines
  Added in v.27
  ViewVC Help
Powered by ViewVC 1.1.26