Select Code to Download

sub some_method {
    my $self = shift;
    my ($various, $other, $parameters) = @_;
}

sub process_list {
    my ($some, $positional, $params) = splice @_, 0, 3;

...
        # ...
    }
}