Revision 3

Date:
2004/08/08 10:53:04
Author:
dpavlin
Revision Log:
one more planned call: find_paths
Files:

Legend:

 
Added
 
Removed
 
Modified

  • trunk/Split.pm

     
    100 100
    101 101 sub add {
    102 102 my $self = shift;
    103
    104 my $swishpath = shift || return;
    105 my $data = shift || return;
    106
    107 return 1;
    103 108 }
    104 109
    105 110 =head2 delete
    106 111
    107 Delete document from index.
    112 Delete documents from index.
    108 113
    109 $i->delete($swishpath);
    114 $i->delete(@swishpath);
    110 115
    111 116 =cut
    112 117
    113 118 sub delete {
    114 119 my $self = shift;
    120
    121 my @paths = @_ || return;
    122
    123 return 42;
    115 124 }
    116 125
    117 126
    … …  
    128 137
    129 138 sub close {
    130 139 my $self = shift;
    140
    141 return 1;
    131 142 }
    132 143
    133 144
    … …  
    231 242 }
    232 243 }
    233 244
    245 =head2 find_paths
    234 246
    247 Return array of C<swishpath>s for given C<swish-e> query.
    235 248
    249 my @p = $i->find_paths("headline=test*");
    250
    251 Useful for combining with L<"delete_documents"> to delete documents
    252 which hasn't changed a while (so, expired).
    253
    254 =cut
    255
    256 sub find_paths {
    257 my $self = shift;
    258
    259 my $s = shift || return;
    260 }
    261
    262
    263
    236 264 1;
    237 265 __END__
    238 266