perl-SUPER

Control Superclass Method Dispatch

When subclassing a class, you occasionally want to dispatch control to the superclass -- at least conditionally and temporarily. The Perl syntax for calling your superclass is ugly and unwieldy: $self->SUPER::method(@_); especially when compared to its Ruby equivalent: super; It's even worse in that the normal Perl redispatch mechanism only dispatches to the parent of the class containing the method _at compile time_. That doesn't work very well for mixins and roles. This module provides nicer equivalents, along with the universal method 'super' to determine a class' own superclass. This allows you to do things such as: goto &{$_[0]->super('my_method')}; if you don't like wasting precious stack frames. If you are using roles or mixins or otherwise pulling in methods from other packages that need to dispatch to their super methods, or if you want to pass different arguments to the super method, use the 'SUPER()' method: $self->SUPER( qw( other arguments here ) );