Changeset 2180 for perl/SWISH-Prog/trunk/lib
- Timestamp:
- 10/21/08 12:47:53 (3 months ago)
- Files:
-
- perl/SWISH-Prog/trunk/lib/SWISH/Prog.pm (modified) (1 diff)
- perl/SWISH-Prog/trunk/lib/SWISH/Prog/Aggregator.pm (modified) (1 diff)
- perl/SWISH-Prog/trunk/lib/SWISH/Prog/Aggregator/DBI.pm (modified) (1 diff)
- perl/SWISH-Prog/trunk/lib/SWISH/Prog/Aggregator/FS.pm (modified) (1 diff)
- perl/SWISH-Prog/trunk/lib/SWISH/Prog/Aggregator/Mail.pm (modified) (1 diff)
- perl/SWISH-Prog/trunk/lib/SWISH/Prog/Aggregator/Object.pm (modified) (1 diff)
- perl/SWISH-Prog/trunk/lib/SWISH/Prog/Aggregator/Spider.pm (modified) (1 diff)
- perl/SWISH-Prog/trunk/lib/SWISH/Prog/Cache.pm (modified) (1 diff)
- perl/SWISH-Prog/trunk/lib/SWISH/Prog/Class.pm (modified) (1 diff)
- perl/SWISH-Prog/trunk/lib/SWISH/Prog/Config.pm (modified) (1 diff)
- perl/SWISH-Prog/trunk/lib/SWISH/Prog/Doc.pm (modified) (1 diff)
- perl/SWISH-Prog/trunk/lib/SWISH/Prog/Headers.pm (modified) (1 diff)
- perl/SWISH-Prog/trunk/lib/SWISH/Prog/Indexer.pm (modified) (1 diff)
- perl/SWISH-Prog/trunk/lib/SWISH/Prog/Indexer/Native.pm (modified) (1 diff)
- perl/SWISH-Prog/trunk/lib/SWISH/Prog/InvIndex.pm (modified) (1 diff)
- perl/SWISH-Prog/trunk/lib/SWISH/Prog/InvIndex/Meta.pm (modified) (1 diff)
- perl/SWISH-Prog/trunk/lib/SWISH/Prog/InvIndex/Native.pm (modified) (1 diff)
- perl/SWISH-Prog/trunk/lib/SWISH/Prog/Query.pm (modified) (1 diff)
- perl/SWISH-Prog/trunk/lib/SWISH/Prog/QueryParser.pm (modified) (1 diff)
- perl/SWISH-Prog/trunk/lib/SWISH/Prog/Queue.pm (modified) (1 diff)
- perl/SWISH-Prog/trunk/lib/SWISH/Prog/Utils.pm (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
perl/SWISH-Prog/trunk/lib/SWISH/Prog.pm
r2067 r2180 10 10 use SWISH::Prog::Config; 11 11 12 our $VERSION = '0.2 0';12 our $VERSION = '0.21'; 13 13 14 14 __PACKAGE__->mk_accessors(qw( aggregator )); perl/SWISH-Prog/trunk/lib/SWISH/Prog/Aggregator.pm
r2067 r2180 9 9 use Scalar::Util qw( blessed ); 10 10 11 our $VERSION = '0.2 0';11 our $VERSION = '0.21'; 12 12 13 13 =pod perl/SWISH-Prog/trunk/lib/SWISH/Prog/Aggregator/DBI.pm
r2067 r2180 11 11 __PACKAGE__->mk_accessors(qw( db title alias_columns schema )); 12 12 13 our $VERSION = '0.2 0';13 our $VERSION = '0.21'; 14 14 our $XMLer = $SWISH::Prog::Utils::XML; 15 15 perl/SWISH-Prog/trunk/lib/SWISH/Prog/Aggregator/FS.pm
r2067 r2180 8 8 use File::Find; 9 9 10 our $VERSION = '0.2 0';10 our $VERSION = '0.21'; 11 11 12 12 =pod perl/SWISH-Prog/trunk/lib/SWISH/Prog/Aggregator/Mail.pm
r2067 r2180 9 9 use base qw( SWISH::Prog::Aggregator ); 10 10 11 our $VERSION = '0.2 0';11 our $VERSION = '0.21'; 12 12 our $XMLer = Search::Tools::XML->new; 13 13 perl/SWISH-Prog/trunk/lib/SWISH/Prog/Aggregator/Object.pm
r2067 r2180 14 14 qw( methods class title url modtime class_meta serial_format )); 15 15 16 our $VERSION = '0.2 0';16 our $VERSION = '0.21'; 17 17 our $XMLer = $SWISH::Prog::Utils::XML; 18 18 perl/SWISH-Prog/trunk/lib/SWISH/Prog/Aggregator/Spider.pm
r2067 r2180 15 15 #use LWP::Debug qw(+); 16 16 17 our $VERSION = '0.2 0';17 our $VERSION = '0.21'; 18 18 19 19 =pod perl/SWISH-Prog/trunk/lib/SWISH/Prog/Cache.pm
r2067 r2180 6 6 use Carp; 7 7 8 our $VERSION = '0.2 0';8 our $VERSION = '0.21'; 9 9 10 10 =pod perl/SWISH-Prog/trunk/lib/SWISH/Prog/Class.pm
r2067 r2180 6 6 use Data::Dump; 7 7 8 our $VERSION = '0.2 0';8 our $VERSION = '0.21'; 9 9 10 10 __PACKAGE__->mk_accessors(qw( verbose debug warnings )); perl/SWISH-Prog/trunk/lib/SWISH/Prog/Config.pm
r2067 r2180 69 69 ); 70 70 71 our $VERSION = '0.2 0';71 our $VERSION = '0.21'; 72 72 73 73 our $XMLer = Search::Tools::XML->new; perl/SWISH-Prog/trunk/lib/SWISH/Prog/Doc.pm
r2067 r2180 16 16 use SWISH::Prog::Headers; 17 17 18 our $VERSION = '0.2 0';18 our $VERSION = '0.21'; 19 19 20 20 my @Attr = qw( url modtime type parser content action size charset data ); perl/SWISH-Prog/trunk/lib/SWISH/Prog/Headers.pm
r2067 r2180 9 9 use bytes; # so length() measures bytes 10 10 11 our $VERSION = '0.2 0';11 our $VERSION = '0.21'; 12 12 our $AutoURL = time(); 13 13 our %Headers = ( perl/SWISH-Prog/trunk/lib/SWISH/Prog/Indexer.pm
r2067 r2180 6 6 use Carp; 7 7 8 our $VERSION = '0.2 0';8 our $VERSION = '0.21'; 9 9 10 10 __PACKAGE__->mk_accessors(qw( invindex config count clobber flush started )); perl/SWISH-Prog/trunk/lib/SWISH/Prog/Indexer/Native.pm
r2067 r2180 8 8 use Scalar::Util qw( blessed ); 9 9 10 our $VERSION = '0.2 0';10 our $VERSION = '0.21'; 11 11 12 12 __PACKAGE__->mk_accessors(qw( fh exe opts )); perl/SWISH-Prog/trunk/lib/SWISH/Prog/InvIndex.pm
r2067 r2180 12 12 ); 13 13 14 our $VERSION = '0.2 0';14 our $VERSION = '0.21'; 15 15 16 16 __PACKAGE__->mk_accessors(qw( path clobber )); perl/SWISH-Prog/trunk/lib/SWISH/Prog/InvIndex/Meta.pm
r2067 r2180 4 4 use base qw( SWISH::Prog::Class ); 5 5 6 our $VERSION = '0.2 0';6 our $VERSION = '0.21'; 7 7 8 8 # index metadata. read/write libswish3 file xml format. perl/SWISH-Prog/trunk/lib/SWISH/Prog/InvIndex/Native.pm
r2067 r2180 6 6 __PACKAGE__->mk_accessors(qw( file )); 7 7 8 our $VERSION = '0.2 0';8 our $VERSION = '0.21'; 9 9 10 10 =head1 NAME perl/SWISH-Prog/trunk/lib/SWISH/Prog/Query.pm
r2067 r2180 5 5 use Carp; 6 6 7 our $VERSION = '0.2 0';7 our $VERSION = '0.21'; 8 8 9 9 __PACKAGE__->mk_ro_accessors(qw( q parser )); perl/SWISH-Prog/trunk/lib/SWISH/Prog/QueryParser.pm
r2067 r2180 10 10 use SWISH::Prog::Query; 11 11 12 our $VERSION = '0.2 0';12 our $VERSION = '0.21'; 13 13 14 14 __PACKAGE__->mk_accessors( perl/SWISH-Prog/trunk/lib/SWISH/Prog/Queue.pm
r2067 r2180 5 5 use Carp; 6 6 7 our $VERSION = '0.2 0';7 our $VERSION = '0.21'; 8 8 9 9 =pod perl/SWISH-Prog/trunk/lib/SWISH/Prog/Utils.pm
r2067 r2180 45 45 =cut 46 46 47 our $VERSION = '0.2 0';47 our $VERSION = '0.21'; 48 48 our $ExtRE = qr{(html|htm|xml|txt|pdf|ps|doc|ppt|xls|mp3)(\.gz)?}io; 49 49 our $XML = Search::Tools::XML->new;
