Select Code to Download

sub mylol {
  my $self=shift;
...
    $lol = super();
  }
}

sub mylol {
    my $self = shift;
...
    super();
    # $self->{data} is restored here
};

package Moose;
...
...
    return if defined $SUPER_PACKAGE && $SUPER_PACKAGE ne caller();
    return unless $SUPER_BODY; $SUPER_BODY->(@SUPER_ARGS);
}