Help for this page

Select Code to Download

Select or download this

    eval qq{ 
        sub $_ 
...
            shift->SUPER::$_ 
        }
    }

Select or download this

    eval qq{ 
        sub $_ 
...
            $self->SUPER::$_ (@_);
        }
    }