that's not a problem with inheritance, but with 'strict'

do something like:

use vars qw(@ISA);

regards,

Jos

----- Original Message -----
From: "Edwin Günthner" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Thursday, September 06, 2001 1:19 PM
Subject: Problem with inheritance


> Hi there,
>
> I have the following files:
>
>   B\
>     MyClass.pm
>     C\
>       DescendantOfMyClass.pm
>
> MyClass looks like this:
> >>>
> package B::MyClass;
> ...
> <<<
>
> and DescendantOfMyClass looks like this:
> >>>
> package B::C::DescendantOfMyClass;
>
> use B::MyClass;
>
> @ISA = qw(B::MyClass);
>
> ...
> <<<
>
> Well, and it simply doesnt work; perl tells me that:
> Global symbol "@ISA" requires explicit package name at
> .\/B/C/DescendantOfMyClass.pm line 6.
>
> I tried a lot of different things (like omitting B::, omitting B::C::)
> but nothing worked.
>
> Any idea whats wrong here?
>
> thx,
>
> eg
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
>
>
>


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to