----- Original Message ----- 
From: James Maes <[EMAIL PROTECTED]>
To: Paul D. Smith <[EMAIL PROTECTED]>; <[EMAIL PROTECTED]>
Sent: Thursday, April 19, 2001 11:48 PM
Subject: Re: ISA inheritance vs. DBI?


> 
> 
> connect
> {
>    my($that) = shift;
>    my $class = ref($that) || $that;
>    my $self = bless $that->SUPER::new(@_), $class;
>    $self->{class} = $class;
> 
> return(self);
> }

or :

sub connect{
    my $class = shift;
    my $class = ref($class) || $class;
    return bless $class->SUPER::connect(@_), $class;
}


}

Reply via email to