use Help 'Horrible::Thing';
This calls Help->import('Horrible::Thing'):
package Help; sub import { my ($selfclass, @classes) = @_; for my $class (@classes) { my $isa_var = $class . "::ISA"; push @{$isa_var}, $selfclass; } }