Select Code to Download

sub foo {
    my $self  = shift;
    $self->bar( "do something" );
}

sub foo {
    my $self  = shift;
    $self->SUPER::foo( "do something" );
}