Ok, your are right. It seems that to override the 'connect' method,
you have to put it in MySubDBI::connect package.
Thank you for your help.
On 12/30/05, Tim Bunce <[EMAIL PROTECTED]> wrote:
> On Fri, Dec 30, 2005 at 12:58:02PM +0100, wernerus sebastien wrote:
> > Ti
Tim, I made the changes you suggested. Here is the code:
---
package MySubDBI;
use strict;
use DBI;
use vars qw(@ISA);
@ISA = qw(DBI);
package MySubDBI::dr;
use vars qw(@ISA);
@ISA = qw(DBI::dr);
sub connect {
my ($drh, @args) = @_;
my $dbh = $drh->SUPER::c
Hi,
I'm new to OO programming, and i'd like to subclass DBI for some purpose.
I made some tests to figure out how it worked. Here is a sample code
that doesn't do anything interesting. It doesn't execute as I
expected:
==
package MySubDBI;
use strict;
use DBI;
use vars qw(@