view release on metacpan or  search on metacpan

README.mkdn  view on Meta::CPAN

are stored. `code_version` is the version of the code when it
was last loaded from the database.

The `verbose` setting determines if progress gets output to
`STDERR`.
Likely, this package variable will get dropped in favour of
a method to output (or discard) the progress.

## `Package->connect DSN,User,Pass,Options`

Connects to the database with the credentials given.

If called in void context, stores the DBI handle in the
`dbh` accessor, otherwise returns the DBI handle.

If you already have an existing database handle, just
set the `dbh` accessor with it instead.

## `Package->create_sub NAME, CODE`

Creates a subroutine in the Package namespace.

lib/DBIx/VersionedSubs.pm  view on Meta::CPAN

    for my $def (keys %defaults) {
        if (! defined $package->$def) {
            $package->$def($defaults{$def});
        };
    }
    $package;
};

=head2 C<< Package->connect DSN,User,Pass,Options >>

Connects to the database with the credentials given.

If called in void context, stores the DBI handle in the
C<dbh> accessor, otherwise returns the DBI handle.

If you already have an existing database handle, just
set the C<dbh> accessor with it instead.

=cut

sub connect {