Select Code to Download

sub can {
    my ($self, $meth) = @_;
    my $class = ref $self || $self;
...
    }
    return undef;
}