3 |
# $Id$ |
# $Id$ |
4 |
# |
# |
5 |
# $Log$ |
# $Log$ |
6 |
|
# Revision 1.4 2002/12/01 04:45:38 joko |
7 |
|
# + sub eraseAll |
8 |
|
# + sub createDb |
9 |
|
# |
10 |
# Revision 1.3 2002/11/29 04:58:20 joko |
# Revision 1.3 2002/11/29 04:58:20 joko |
11 |
# + Storage::Result now uses the same dispatching mechanism like Storage::Handler |
# + Storage::Result now uses the same dispatching mechanism like Storage::Handler |
12 |
# |
# |
186 |
# TODO: |
# TODO: |
187 |
# - abstract "abstract methods" to list/hash to be used in AUTOLOAD |
# - abstract "abstract methods" to list/hash to be used in AUTOLOAD |
188 |
# e.g.: my @ABSTRACT_METHODS = (qw( connect sendCommand getChildNodes )); |
# e.g.: my @ABSTRACT_METHODS = (qw( connect sendCommand getChildNodes )); |
189 |
|
# use Class::XYZ (Construct) |
190 |
# - build them via anonymous subs |
# - build them via anonymous subs |
191 |
# - introduce them via symbols |
# - introduce them via symbols |
192 |
|
|
247 |
return; |
return; |
248 |
} |
} |
249 |
|
|
250 |
|
sub eraseAll { |
251 |
|
my $self = shift; |
252 |
|
$self->_abstract_function('eraseAll'); |
253 |
|
return; |
254 |
|
} |
255 |
|
|
256 |
|
sub createDb { |
257 |
|
my $self = shift; |
258 |
|
$self->_abstract_function('createDb'); |
259 |
|
return; |
260 |
|
} |
261 |
|
|
262 |
1; |
1; |