@ISA = qw(DBI) no worky part II

[Chuck Phillips]

~sdpm~
Sorry, hit some key combo that sent the message before I was ready.... Let's
try this again.

Hello All,

I'm trying to write a package that inherits from DBI, but am missing
something. Running the following test script gives me the following:

Can't locate object method "connect" via package "Bar" at ./test.pl line 12.

Any help would be appreciated.

-Chuck

# Code below
package Foo;
sub connect2 { my ($self, $name) = @_; print "FOO BAR $name\n"; bless {},
$self; };
sub bar { print "hi\n"; }

package Bar;
@ISA = qw(Foo DBI);
sub foo { print "there.\n"; };

package main;
my $a = Bar->connect("dbi:mysql:test:localhost",'root','foo');
$a->bar;
$a->foo;

~sdpm~

The posting address is: san-diego-pm-list at hfb.pm.org

List requests should be sent to: majordomo at hfb.pm.org

If you ever want to remove yourself from this mailing list,
you can send mail to <majordomo at happyfunball.pm.org> with the following
command in the body of your email message:

    unsubscribe san-diego-pm-list

If you ever need to get in contact with the owner of the list,
(if you have trouble unsubscribing, or have questions about the
list itself) send email to <owner-san-diego-pm-list at happyfunball.pm.org> .
This is the general rule for most mailing lists when you need
to contact a human.