package fs_ipmi; require Exporter; @ISA = qw(Exporter tdf support_libs); @EXPORT = qw(GetDebugInfo ReserveDPV DeleteDPV SetPowerState SetResetState SetControlState GetControlState GetSensorReading RestoreFactoryDefaults StoreParameters SetAudibleState GetEventReceiver GetSensorThresholds SetSensorThresholds GetSensorEventEnable SetSensorEventEnable GetSlotGA GetDeviceID SServerUp Slot2HexAdrs GetPERStatus GetDebugInfo SetRelayState GetRelayState Fast_fs_ipmi GetSELInfo ReserveSEL ClearSEL GetSELTime SetSELTime GetIPMIEnableState); support_libs.pm: package support_libs; use Exporter; our @EXPORT = qw(write_dlog defineBlades debug_ip convert_slot System_tests chassis_status); our @ISA = qw(Exporter tdf); use Switch; use fs_ipmi; use Tk 800.00; use Tk::DialogBox;