Welcome to the Monastery | |
PerlMonks |
comment on |
( [id://3333]=superdoc: print w/replies, xml ) | Need Help?? |
I'm trying to set up a general wrapper for multiple hardware devices that can interface with different device drivers based on the name specified in the new() call. For example, calling DeviceClass->new("Device1") from the main program would use a device with driver module Device1 and DeviceClass->new("Device2") would use a device with driver module Device2. What seems to be complicating this is the fact that the Device# driver modules (Device1 and Device2 in this example) are shared components that are not mine and are not object-oriented (my modules such as DeviceClass are OO though). I'd prefer to keep these files as they are so as not to affect other scripts that use them. I tried the following but haven't had any luck, probably because the device modules are not object oriented.
I also looked at the aliased module, but that doesn't seem to be an option for working with non-OO modules. Given these constraints, is there any way for DeviceClass to have access to all of the functions in Device# and to call those functions from within the functions in DeviceClass? In reply to Inheritance based on input by cbanker
|
|