Select Code to Download

sub generally_useful {
    my $class = shift;
    # ...
}

sub instance_meth {
    my $self = shift;
    my $class = ref $self;
}