Select Code to Download

  package MyPackage;

...
    my $self = $flyweight->access(shift);
    return $self->{name};
  }

  package MyPackage;
...
    my $self = $instance{shift(@_)};
    return $self->{name};
  }