root/lang/perl/Data-Storage/tags/Data-Storage-0.06/lib/Data/Storage/DBI/Unrealized.pm @ 10093

Revision 10093, 0.8 kB (checked in by hanekomu, 6 years ago)

lang/perl/Data-Storage: initial import

Line 
1package Data::Storage::DBI::Unrealized;
2
3# $Id$
4
5use strict;
6use warnings;
7
8
9our $VERSION = '0.06';
10
11
12use base 'Class::Accessor::Complex';
13
14
15__PACKAGE__
16    ->mk_new
17    ->mk_scalar_accessors(qw(callback));
18
19
20use constant DEFAULTS => ();
21use constant FIRST_CONSTRUCTOR_ARGS => ();
22
23
24sub AUTOLOAD {
25    my $self = shift;
26    (my $method = our $AUTOLOAD) =~ s/.*://;
27    $self->callback->connect;
28    $self->callback->dbh->$method(@_);
29}
30
31
321;
33
34
35__END__
36
37{% USE p = PodGenerated %}
38
39=head1 NAME
40
41{% p.package %} - generic abstract storage mechanism
42
43=head1 SYNOPSIS
44
45    {% p.package %}->new;
46
47=head1 DESCRIPTION
48
49None yet. This is an early release; fully functional, but undocumented. The
50next release will have more documentation.
51
52=head1 METHODS
53
54=over 4
55
56{% p.write_methods %}
57
58=back
59
60{% p.write_inheritance %}
61
62{% PROCESS standard_pod %}
63
64=cut
65
Note: See TracBrowser for help on using the browser.