Last change
on this file since 4 was 4, checked in by sjboddie, 25 years ago |
Initial revision
|
-
Property svn:executable
set to
*
-
Property svn:keywords
set to
Author Date Id Revision
|
File size:
357 bytes
|
Line | |
---|
1 | # document processors are used by the document reader plugins
|
---|
2 | # to do some processing on some documents
|
---|
3 |
|
---|
4 | package docproc;
|
---|
5 |
|
---|
6 | sub new {
|
---|
7 | my ($class) = @_;
|
---|
8 | my $self = {};
|
---|
9 |
|
---|
10 | return bless $self, $class;
|
---|
11 | }
|
---|
12 |
|
---|
13 | sub process {
|
---|
14 | my $self = shift (@_);
|
---|
15 | my ($doc_obj) = @_;
|
---|
16 |
|
---|
17 | die "docproc::process function must be implemented in sub classes\n";
|
---|
18 | }
|
---|
19 |
|
---|
20 | 1;
|
---|
21 |
|
---|
Note:
See
TracBrowser
for help on using the repository browser.