Hi Brian,
I think it would work if you were using the complete PackageName
so using
if ($platform eq 'TYPEA') { @ISA = ("LIB::DATALOG_PARSERS::TYPEA"); }
elsif ($platform eq 'TYPEB') { @ISA = ("LIB::DATALOG_PARSERS::TYPEB"); }
elsif ($platform eq 'TYPEC') { @ISA = ("LIB::DATALOG_PARSERS::TYPEC"); }
instead of
if ($platform eq 'TYPEA') { @ISA = ("TYPEA"); }
elsif ($platform eq 'TYPEB') { @ISA = ("TYPEB"); }
elsif ($platform eq 'TYPEC') { @ISA = ("TYPEC"); }
should do the job.
>the read method that gets invoked is not present in the
>dlog module, but should be inherited from TYPEA.pm, etc.
>however perl is telling me that it can't find it. any idea why?
Yes, Perl is trying to invoke TYPEA::read() which doesnt exist. LIB::DATALOG_PARSERS::TYPEA::read() should be called instead.
HTH
Georg Mavridis
_______________________________________________ Perl-Unix-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
